Bruce Lowekamp <[EMAIL PROTECTED]> writes:
> It eventually works down to the root directory, where it stays in an
> infinite loop:
> tramp: Finding true name for `/[ssh/grid.cs.wm.edu]/'
> tramp: True name of `/[ssh/grid.cs.wm.edu]/' is `'
> tramp: Finding true name for `/[ssh/grid.cs.wm.edu]/../'
> tramp: Check /..
> tramp: file attributes with perl: /[ssh/grid.cs.wm.edu]/..
> tramp: Processing step `..'
> tramp: True name of `/[ssh/grid.cs.wm.edu]/../' is `'
> tramp: Finding true name for `/[ssh/grid.cs.wm.edu]/'
> tramp: True name of `/[ssh/grid.cs.wm.edu]/' is `'
> tramp: Finding true name for `/[ssh/grid.cs.wm.edu]/../'
> tramp: Check /..
Please try this patch. If it doesn't help, it should at least change
that output. (The *debug tramp/foo* buffer would be useful, if it
doesn't work.)
Index: tramp.el
===================================================================
RCS file: /cvsroot/tramp/tramp/lisp/tramp.el,v
retrieving revision 2.237
retrieving revision 2.238
diff -u -u -r2.237 -r2.238
--- tramp.el 3 Oct 2002 21:47:40 -0000 2.237
+++ tramp.el 4 Oct 2002 20:35:29 -0000 2.238
@@ -1907,14 +1907,17 @@
(when (>= numchase numchase-limit)
(error "Maximum number (%d) of symlinks exceeded" numchase-limit))
(setq result (reverse result))
+ ;; Combine list to form string.
+ (setq result
+ (if result
+ (mapconcat 'identity (cons "" result) "/")
+ "/"))
+ (when is-dir (setq result (concat result "/")))
(tramp-message-for-buffer
multi-method method user host
- 10 "True name of `%s' is `%s'"
- filename (mapconcat 'identity (cons "" result) "/"))
+ 10 "True name of `%s' is `%s'" filename result)
(tramp-make-tramp-file-name
- multi-method method user host
- (concat (mapconcat 'identity (cons "" result) "/")
- (if is-dir "/" ""))))))
+ multi-method method user host result))))
;; Basic functions.
kai
--
~/.signature is: umop ap!sdn (Frank Nobis)
_______________________________________________
Tramp-devel mailing list
[EMAIL PROTECTED]
http://mail.freesoftware.fsf.org/mailman/listinfo/tramp-devel
