diff lisp/net/tramp.el @ 107628:16554eec2238

Merge from mainline.
author Eli Zaretskii <eliz@gnu.org>
date Sat, 30 Jan 2010 08:50:39 -0500
parents 28bc861d56c5
children d7831d04952b
line wrap: on
line diff
--- a/lisp/net/tramp.el	Fri Jan 29 06:13:16 2010 -0500
+++ b/lisp/net/tramp.el	Sat Jan 30 08:50:39 2010 -0500
@@ -4147,6 +4147,8 @@
 	;; The inserted file could be from somewhere else.
 	(when (and (not wildcard) (not full-directory-p))
 	  (goto-char (point-max))
+	  (when (file-symlink-p filename)
+	    (goto-char (search-backward "->" beg 'noerror)))
 	  (search-backward
 	   (if (zerop (length (file-name-nondirectory filename)))
 	       "."