diff options
| author | Stefan Kangas <stefankangas@gmail.com> | 2020-03-09 00:33:53 +0100 |
|---|---|---|
| committer | Stefan Kangas <stefankangas@gmail.com> | 2020-03-11 02:22:04 +0100 |
| commit | e003e90c41c0abb357c34eb30553f75148072949 (patch) | |
| tree | 3837788dd04a342b9458ff73ebeefa0fac9552b5 /lisp/eshell/em-glob.el | |
| parent | 0d6c51320d8066db867aae0e623d9731c69121ed (diff) | |
| download | emacs-e003e90c41c0abb357c34eb30553f75148072949.tar.gz | |
Remove more XEmacs compat code from eshell
* lisp/eshell/em-glob.el (eshell-extended-glob):
* lisp/eshell/em-ls.el (eshell-do-ls):
* lisp/eshell/em-unix.el (eshell/du, eshell-mvcpln-template):
* lisp/eshell/esh-util.el (eshell-file-attributes): Remove more XEmacs
compat code; no longer let-bind the unused variable ange-cache.
Diffstat (limited to 'lisp/eshell/em-glob.el')
| -rw-r--r-- | lisp/eshell/em-glob.el | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/lisp/eshell/em-glob.el b/lisp/eshell/em-glob.el index 43483dcd50e..a32a6abe29c 100644 --- a/lisp/eshell/em-glob.el +++ b/lisp/eshell/em-glob.el @@ -232,8 +232,6 @@ resulting regular expression." (regexp-quote (substring pattern matched-in-pattern)) "\\'"))) -(defvar ange-cache) ; XEmacs? See esh-util - (defun eshell-extended-glob (glob) "Return a list of files generated from GLOB, perhaps looking for DIRS-ONLY. This function almost fully supports zsh style filename generation @@ -252,7 +250,7 @@ the form: (INCLUDE-REGEXP EXCLUDE-REGEXP (PRED-FUNC-LIST) (MOD-FUNC-LIST))" (let ((paths (eshell-split-path glob)) - eshell-glob-matches message-shown ange-cache) + eshell-glob-matches message-shown) (unwind-protect (if (and (cdr paths) (file-name-absolute-p (car paths))) |