]> git.eshelyaron.com Git - emacs.git/commit
Make use of rx in Tramp backward compatoble
authorMichael Albinus <michael.albinus@gmx.de>
Fri, 9 Sep 2022 15:10:28 +0000 (17:10 +0200)
committerMichael Albinus <michael.albinus@gmx.de>
Fri, 9 Sep 2022 15:10:28 +0000 (17:10 +0200)
commit08cc6c4d9e42079f88c6c30d9a2324dd6f0cec2b
treea5f6e5325a24feb9a481df77c20e27e3b42683e7
parent72c64dd73c93a92f91431435a0295d748588a4ed
Make use of rx in Tramp backward compatoble

* lisp/net/tramp-compat.el (tramp-compat-rx--runtime-params): New defvar.
(tramp-compat-rx--transform-items)
(tramp-compat-rx--transform-item, tramp-compat-rx--transform):
New defuns.  Suggested by Mattias EngdegĂ„rd <mattiase@acm.org>.
(tramp-compat-rx): New defalias or defmacro.
(tramp-compat-string-replace, tramp-compat-string-search):
Use regexp-quote.

* lisp/net/tramp.el:
* lisp/net/tramp-adb.el:
* lisp/net/tramp-archive.el:
* lisp/net/tramp-cmds.el:
* lisp/net/tramp-crypt.el:
* lisp/net/tramp-fuse.el:
* lisp/net/tramp-gvfs.el:
* lisp/net/tramp-sh.el:
* lisp/net/tramp-smb.el:
* lisp/net/tramp-sudoedit.el: Use `tramp-compat-rx' where indicated.

* test/lisp/net/tramp-archive-tests.el:
* test/lisp/net/tramp-tests.el: Use `tramp-compat-rx' where indicated.
13 files changed:
lisp/net/tramp-adb.el
lisp/net/tramp-archive.el
lisp/net/tramp-cmds.el
lisp/net/tramp-compat.el
lisp/net/tramp-crypt.el
lisp/net/tramp-fuse.el
lisp/net/tramp-gvfs.el
lisp/net/tramp-sh.el
lisp/net/tramp-smb.el
lisp/net/tramp-sudoedit.el
lisp/net/tramp.el
test/lisp/net/tramp-archive-tests.el
test/lisp/net/tramp-tests.el