From 53afc6860d4eb275bf4739a1b573b6511d41d485 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Wed, 7 Nov 2007 03:57:06 +0000 Subject: [PATCH] David Hansen (eshell-extended-glob): Sort matches. --- lisp/ChangeLog | 4 ++++ lisp/eshell/em-glob.el | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 7622873361d..ba0db896abf 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2007-11-07 David Hansen + + * eshell/em-glob.el (eshell-extended-glob): Sort matches. + 2007-11-07 Glenn Morris * emulation/tpu-mapper.el (tpu-map-key): Use unless rather than cond. diff --git a/lisp/eshell/em-glob.el b/lisp/eshell/em-glob.el index 5d68fdf9437..b1d8736b860 100644 --- a/lisp/eshell/em-glob.el +++ b/lisp/eshell/em-glob.el @@ -258,7 +258,7 @@ the form: (eshell-glob-entries (file-name-as-directory ".") paths)) (if message-shown (message nil))) - (or (and matches (nreverse matches)) + (or (and matches (sort matches #'string<)) (if eshell-error-if-no-glob (error "No matches found: %s" glob) glob)))) -- 2.39.2