diff options
author | John Wiegley <johnw@newartisans.com> | 2000-10-13 09:02:39 +0000 |
---|---|---|
committer | John Wiegley <johnw@newartisans.com> | 2000-10-13 09:02:39 +0000 |
commit | 8c6b1d83116d00e27f22e501e5ac4fea9a7ba182 (patch) | |
tree | 7f624b71b8c6ec4c388bc34b92a8ebe8d2fb20e5 /lisp/eshell/em-pred.el | |
parent | e2c06b17a94a7b06cd27b643f8d5118243f06969 (diff) | |
download | emacs-8c6b1d83116d00e27f22e501e5ac4fea9a7ba182.tar.gz |
Added better remote directory support to Eshell, as well as a few bug
fixes. See the ChangeLog.
Diffstat (limited to 'lisp/eshell/em-pred.el')
-rw-r--r-- | lisp/eshell/em-pred.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/eshell/em-pred.el b/lisp/eshell/em-pred.el index c3e3de5adbd..9708e2d793a 100644 --- a/lisp/eshell/em-pred.el +++ b/lisp/eshell/em-pred.el @@ -464,7 +464,7 @@ that 'ls -l' will show in the first column of its display. " (forward-char) (setq type ?%))) `(lambda (file) - (let ((attrs (file-attributes (directory-file-name file)))) + (let ((attrs (eshell-file-attributes (directory-file-name file)))) (if attrs (memq (aref (nth 8 attrs) 0) ,(if (eq type ?%) @@ -489,7 +489,7 @@ that 'ls -l' will show in the first column of its display. " (setq amount (string-to-number (match-string 0))) (goto-char (match-end 0)) `(lambda (file) - (let ((attrs (file-attributes file))) + (let ((attrs (eshell-file-attributes file))) (if attrs (,(if (eq qual ?-) '< @@ -518,7 +518,7 @@ that 'ls -l' will show in the first column of its display. " (setq amount (* (string-to-number (match-string 0)) quantum)) (goto-char (match-end 0)) `(lambda (file) - (let ((attrs (file-attributes file))) + (let ((attrs (eshell-file-attributes file))) (if attrs (,(if (eq qual ?-) '< |