Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
5c3f9bcc
Commit
5c3f9bcc
authored
Sep 13, 2013
by
Glenn Morris
Browse files
* eshell/esh-util.el (ange-cache): Move declaration earlier.
parent
2ada368a
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
4 additions
and
2 deletions
+4
-2
lisp/ChangeLog
lisp/ChangeLog
+2
-0
lisp/eshell/esh-util.el
lisp/eshell/esh-util.el
+2
-2
No files found.
lisp/ChangeLog
View file @
5c3f9bcc
2013-09-13 Glenn Morris <rgm@gnu.org>
* eshell/esh-util.el (ange-cache): Move declaration earlier.
* eshell/esh-ext.el (eshell-search-path): Declare.
* eshell/em-prompt.el (eshell/pwd): Autoload it.
...
...
lisp/eshell/esh-util.el
View file @
5c3f9bcc
...
...
@@ -562,6 +562,8 @@ Unless optional argument INPLACE is non-nil, return a new string."
(substring string 0 sublen)
string)))
(defvar ange-cache)
(and (featurep 'xemacs)
(not (fboundp 'directory-files-and-attributes))
(defun directory-files-and-attributes (directory &optional full match nosort id-format)
...
...
@@ -579,8 +581,6 @@ If NOSORT is non-nil, the list is not sorted--its order is unpredictable.
(cons file (eshell-file-attributes (expand-file-name file directory)))))
(directory-files directory full match nosort)))))
(defvar ange-cache)
(defun eshell-directory-files-and-attributes (dir &optional full match nosort id-format)
"Make sure to use the handler for `directory-file-and-attributes'."
(let* ((dir (expand-file-name dir)))
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment