changeset 66588:1c3c4d25eede

(eshell-extended-glob): Expand the "." path before passing it down to `eshell-glob-entries'. This is done because special file-handlers will on trigger on ".", even if `default-directory' is special.
author John Wiegley <johnw@newartisans.com>
date Tue, 01 Nov 2005 07:03:03 +0000
parents 809641367405
children 8c8902a666bf
files lisp/eshell/em-glob.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/eshell/em-glob.el	Tue Nov 01 07:02:12 2005 +0000
+++ b/lisp/eshell/em-glob.el	Tue Nov 01 07:03:03 2005 +0000
@@ -254,7 +254,8 @@
 		 (file-name-absolute-p (car paths)))
 	    (eshell-glob-entries (file-name-as-directory (car paths))
 				 (cdr paths))
-	  (eshell-glob-entries (file-name-as-directory ".") paths))
+	  (eshell-glob-entries (expand-file-name
+				(file-name-as-directory ".")) paths))
       (if message-shown
 	  (message nil)))
     (or (and matches (nreverse matches))