[Emacs-diffs] Changes to emacs/lisp/net/tramp.el,v

[Michael Albinus]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Michael Albinus <albinus>       08/10/14 05:53:00

Index: tramp.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/net/tramp.el,v
retrieving revision 1.211
retrieving revision 1.212
diff -u -b -r1.211 -r1.212
--- tramp.el    22 Aug 2008 19:22:55 -0000      1.211
+++ tramp.el    14 Oct 2008 05:52:59 -0000      1.212
@@ -5641,7 +5641,7 @@
       (setq todo actions)
       (while todo
        (setq item (pop todo))
-       (setq pattern (concat (symbol-value (nth 0 item)) "\\'"))
+       (setq pattern (format "\\(%s\\)\\'" (symbol-value (nth 0 item))))
        (setq action (nth 1 item))
        (tramp-message
         vec 5 "Looking for regexp \"%s\" from remote shell" pattern)