Mercurial > emacs
comparison lisp/eshell/em-glob.el @ 85955:456092c61f93
Comment.
author | Glenn Morris <rgm@gnu.org> |
---|---|
date | Wed, 07 Nov 2007 03:57:48 +0000 |
parents | 9e350f92b40d |
children | 19c1fcdf634c 880960b70474 |
comparison
equal
deleted
inserted
replaced
85954:2fa6ffac861c | 85955:456092c61f93 |
---|---|
265 | 265 |
266 (eval-when-compile | 266 (eval-when-compile |
267 (defvar matches) | 267 (defvar matches) |
268 (defvar message-shown)) | 268 (defvar message-shown)) |
269 | 269 |
270 ;; FIXME does this really need to abuse matches, message-shown? | |
270 (defun eshell-glob-entries (path globs &optional recurse-p) | 271 (defun eshell-glob-entries (path globs &optional recurse-p) |
271 "Glob the entries in PATHS, possibly recursing if RECURSE-P is non-nil." | 272 "Glob the entries in PATHS, possibly recursing if RECURSE-P is non-nil." |
272 (let* ((entries (ignore-errors | 273 (let* ((entries (ignore-errors |
273 (file-name-all-completions "" path))) | 274 (file-name-all-completions "" path))) |
274 (case-fold-search eshell-glob-case-insensitive) | 275 (case-fold-search eshell-glob-case-insensitive) |