From: Steve Y. <yo...@us...> - 2002-02-12 01:49:53
|
Update of /cvsroot/tramp/tramp/lisp In directory usw-pr-cvs1:/tmp/cvs-serv23867/lisp Modified Files: ChangeLog tramp.el Log Message: 2002-02-12 Steve Youngs <yo...@xe...> * tramp.el (tramp-handle-insert-directory): Change "#'identity" to "'identity" it was causing a invalid read syntax error that edebug brought to the surface. Add a "." after directory name so that symlinked directories display properly on platforms that have breakage on symlinks like Solaris. Index: ChangeLog =================================================================== RCS file: /cvsroot/tramp/tramp/lisp/ChangeLog,v retrieving revision 2.85 retrieving revision 2.86 diff -C2 -d -r2.85 -r2.86 *** ChangeLog 8 Feb 2002 08:29:59 -0000 2.85 --- ChangeLog 12 Feb 2002 01:49:50 -0000 2.86 *************** *** 1,2 **** --- 1,11 ---- + 2002-02-12 Steve Youngs <yo...@xe...> + + * tramp.el (tramp-handle-insert-directory): Change "#'identity" to + "'identity" it was causing a invalid read syntax error that edebug + brought to the surface. + Add a "." after directory name so that symlinked directories + display properly on platforms that have breakage on symlinks like + Solaris. + 2002-02-08 Kai Großjohann <Kai.Grossjohann@CS.Uni-Dortmund.DE> Index: tramp.el =================================================================== RCS file: /cvsroot/tramp/tramp/lisp/tramp.el,v retrieving revision 2.86 retrieving revision 2.87 diff -C2 -d -r2.86 -r2.87 *** tramp.el 8 Feb 2002 08:29:59 -0000 2.86 --- tramp.el 12 Feb 2002 01:49:51 -0000 2.87 *************** *** 2214,2218 **** (setq path (file-name-directory path))) (when (listp switches) ! (setq switches (mapconcat #'identity switches " "))) (unless full-directory-p (setq switches (concat "-d " switches))) --- 2214,2218 ---- (setq path (file-name-directory path))) (when (listp switches) ! (setq switches (mapconcat 'identity switches " "))) (unless full-directory-p (setq switches (concat "-d " switches))) *************** *** 2230,2234 **** (if wildcard path ! (tramp-shell-quote-argument path)))) (tramp-barf-unless-okay multi-method method user host --- 2230,2234 ---- (if wildcard path ! (tramp-shell-quote-argument (concat path "."))))) (tramp-barf-unless-okay multi-method method user host |