diff options
| author | Tino Calancha <tino.calancha@gmail.com> | 2017-08-06 13:23:05 +0900 |
|---|---|---|
| committer | Tino Calancha <tino.calancha@gmail.com> | 2017-08-06 13:23:18 +0900 |
| commit | c0df64db08b58cdac37cb38c16f2ba2f097fae92 (patch) | |
| tree | 2b6bdf70a4ff60bc367aa56d26e94d097262b546 /test/lisp/eshell | |
| parent | 7c3593f81724d0c7a2ee2f90797db0e705adc859 (diff) | |
| download | emacs-c0df64db08b58cdac37cb38c16f2ba2f097fae92.tar.gz emacs-c0df64db08b58cdac37cb38c16f2ba2f097fae92.tar.bz2 emacs-c0df64db08b58cdac37cb38c16f2ba2f097fae92.zip | |
Dired w/ eshell-ls: Handle shell wildcards in file name
* lisp/eshell/em-ls.el (eshell-ls--insert-directory):
Use eshell-extended-glob (Bug#27844).
* test/lisp/dired-tests.el (dired-test-bug27844): Add test.
Diffstat (limited to 'test/lisp/eshell')
| -rw-r--r-- | test/lisp/eshell/em-ls-tests.el | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/test/lisp/eshell/em-ls-tests.el b/test/lisp/eshell/em-ls-tests.el index 71a555d1eaf..8e7b91d9792 100644 --- a/test/lisp/eshell/em-ls-tests.el +++ b/test/lisp/eshell/em-ls-tests.el @@ -75,6 +75,24 @@ (customize-set-variable 'eshell-ls-use-in-dired orig) (and (buffer-live-p buf) (kill-buffer))))) +(ert-deftest em-ls-test-bug27844 () + "Test for http://debbugs.gnu.org/27844 ." + (let ((orig eshell-ls-use-in-dired) + (dired-use-ls-dired 'unspecified) + buf insert-directory-program) + (unwind-protect + (progn + (customize-set-variable 'eshell-ls-use-in-dired t) + (setq buf (dired (expand-file-name "lisp/*.el" source-directory))) + (dired-toggle-marks) + (should (cdr (dired-get-marked-files))) + (kill-buffer buf) + (setq buf (dired (expand-file-name "lisp/subr.el" source-directory))) + (should (looking-at "subr\\.el"))) + (customize-set-variable 'eshell-ls-use-in-dired orig) + (and (buffer-live-p buf) (kill-buffer))))) + + (provide 'em-ls-test) ;;; em-ls-tests.el ends here |