David Hansen <david.hansen at gmx.net>

(eshell-extended-glob): Sort matches.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 7622873361d6a05c51f229aa6ce6fc0ed34d5a5c..ba0db896abffec7e3f8a94407432613325cee33f 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2007-11-07  David Hansen  <david.hansen@gmx.net>
+
+       * eshell/em-glob.el (eshell-extended-glob): Sort matches.
+
 2007-11-07  Glenn Morris  <rgm@gnu.org>
 
        * 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 5d68fdf94370fbb9832b075a9c4a9129aff2afa9..b1d8736b860ab957d8d43b19a7be4338d088983f 100644 (file)
--- 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))))