]> git.eshelyaron.com Git - emacs.git/commitdiff
Sort files in the default impl of project-files alphabetically
authorDmitry Gutov <dgutov@yandex.ru>
Sun, 14 Apr 2019 21:39:29 +0000 (00:39 +0300)
committerDmitry Gutov <dgutov@yandex.ru>
Sun, 14 Apr 2019 21:39:57 +0000 (00:39 +0300)
* lisp/progmodes/project.el (project--files-in-directory):
Sort the files alphabetically
(https://debbugs.gnu.org/cgi/bugreport.cgi?bug=23179#296).

lisp/progmodes/project.el

index dabc4ab6b45b7f13891e31667f918fc2a1a559c6..b8a58ed317b22e173c58eb4ec374a06e841520e0 100644 (file)
@@ -209,7 +209,8 @@ to find the list of ignores for each directory."
                                      (shell-quote-argument ")"))"")
                          )))
     (project--remote-file-names
-     (split-string (shell-command-to-string command) "\0" t))))
+     (sort (split-string (shell-command-to-string command) "\0" t)
+           #'string<))))
 
 (defun project--remote-file-names (local-files)
   "Return LOCAL-FILES as if they were on the system of `default-directory'."