/[tramp]/tramp/lisp/tramp.el
ViewVC logotype

Diff of /tramp/lisp/tramp.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 2.237 by albinus, Thu Oct 3 21:47:40 2002 UTC revision 2.238 by kai, Fri Oct 4 20:35:29 2002 UTC
# Line 1907  target of the symlink differ." Line 1907  target of the symlink differ."
1907        (when (>= numchase numchase-limit)        (when (>= numchase numchase-limit)
1908          (error "Maximum number (%d) of symlinks exceeded" numchase-limit))          (error "Maximum number (%d) of symlinks exceeded" numchase-limit))
1909        (setq result (reverse result))        (setq result (reverse result))
1910          ;; Combine list to form string.
1911          (setq result
1912                (if result
1913                    (mapconcat 'identity (cons "" result) "/")
1914                  "/"))
1915          (when is-dir (setq result (concat result "/")))
1916        (tramp-message-for-buffer        (tramp-message-for-buffer
1917         multi-method method user host         multi-method method user host
1918         10 "True name of `%s' is `%s'"         10 "True name of `%s' is `%s'" filename result)
        filename (mapconcat 'identity (cons "" result) "/"))  
1919        (tramp-make-tramp-file-name        (tramp-make-tramp-file-name
1920         multi-method method user host         multi-method method user host result))))
        (concat (mapconcat 'identity (cons "" result) "/")  
                (if is-dir "/" ""))))))  
1921    
1922  ;; Basic functions.  ;; Basic functions.
1923    

Legend:
Removed from v.2.237  
changed lines
  Added in v.2.238

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26