* net/tramp-sh.el (tramp-sh-handle-start-file-process):

Insert output at end of buffer.  (Bug#16120)

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0ddce4d..b17f6ab 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2014-02-08  Michael Albinus  <michael.albinus@gmx.de>
+
+       * net/tramp-sh.el (tramp-sh-handle-start-file-process):
+       Insert output at end of buffer.  (Bug#16120)
+
 2014-02-08  Lars Ingebrigtsen  <larsi@gnus.org>
 
        * simple.el (choose-completion-string-functions): Document new

diff --git a/lisp/net/tramp-sh.el b/lisp/net/tramp-sh.el
index d6486de..8d3c4c2 100644 (file)
--- a/lisp/net/tramp-sh.el
+++ b/lisp/net/tramp-sh.el
@@ -2758,7 +2758,7 @@ the result will be a local, non-Tramp, filename."
                ;; `verify-visited-file-modtime'.
                (let ((buffer-undo-list t)
                      (buffer-read-only nil)
-                     (mark (point)))
+                     (mark (point-max)))
                  (clear-visited-file-modtime)
                  (narrow-to-region (point-max) (point-max))
                  ;; We call `tramp-maybe-open-connection', in order