emacs-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [patch] sort eshell glob matches


From: Richard Stallman
Subject: Re: [patch] sort eshell glob matches
Date: Mon, 05 Nov 2007 21:16:32 -0500

Would someone please DTRT with this, then ack?

To: address@hidden
From: David Hansen <address@hidden>
Date: Mon, 05 Nov 2007 04:08:00 +0100
Organization: disorganized
Mime-Version: 1.0
Content-Type: multipart/mixed; boundary="=-=-="
Mail-Copies-To: nobody
Subject: [patch] sort eshell glob matches

--=-=-=

Hello,

I'm using this patch now for several months w/o problems.  I was a bit
annoyed that `ogg123 *' played the songs in 'random' and not
alphabetical order like w/ bash globing.  I can make it customizable if
anyone sees a need for it.

David


--=-=-=
Content-Type: text/x-patch
Content-Disposition: inline

Index: em-glob.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/eshell/em-glob.el,v
retrieving revision 1.22
diff -c -r1.22 em-glob.el
*** em-glob.el  26 Jul 2007 05:26:53 -0000      1.22
--- em-glob.el  5 Nov 2007 03:02:32 -0000
***************
*** 258,264 ****
          (eshell-glob-entries (file-name-as-directory ".") paths))
        (if message-shown
          (message nil)))
!     (or (and matches (nreverse matches))
        (if eshell-error-if-no-glob
            (error "No matches found: %s" glob)
          glob))))
--- 258,264 ----
          (eshell-glob-entries (file-name-as-directory ".") paths))
        (if message-shown
          (message nil)))
!     (or (and matches (sort matches #'string<))
        (if eshell-error-if-no-glob
            (error "No matches found: %s" glob)
          glob))))


Diffs between working revision and workfile end here.
--=-=-=
Content-Type: text/plain; charset="us-ascii"
MIME-Version: 1.0
Content-Transfer-Encoding: 7bit
Content-Disposition: inline

_______________________________________________
Emacs-devel mailing list
address@hidden
http://lists.gnu.org/mailman/listinfo/emacs-devel
--=-=-=--








reply via email to

[Prev in Thread] Current Thread [Next in Thread]