[elpa] externals/denote aab484d617 258/355: Sort grep output with string-lessp

[ELPA Syncer]

branch: externals/denote
commit aab484d617e9e9a08af9740aa3a66f614ddb6646
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>

    Sort grep output with string-lessp
    
    This is a follow-up to commit 429763c.  Basically, we want the file
    names to come in a predictable order, otherwise it can be hard to get a
    sense of their time range.
---
 denote-retrieve.el | 34 ++++++++++++++++++----------------
 1 file changed, 18 insertions(+), 16 deletions(-)

diff --git a/denote-retrieve.el b/denote-retrieve.el
index e12734ee83..8ae8f5cb7e 100644
--- a/denote-retrieve.el
+++ b/denote-retrieve.el
@@ -106,22 +106,24 @@ Optional GROUP is a regexp construct for
   (let* ((default-directory (denote-directory))
          (file (file-name-nondirectory (buffer-file-name))))
     (denote-retrieve--files-in-output
-     (process-lines
-      "find"
-      default-directory
-      "-maxdepth" "1"
-      "-type" "f"
-      "!" "-name" file
-      "-exec"
-      grep-program
-      "--color=never"
-      "-m"
-      "1"
-      "-e"
-      identifier
-      "{}"
-      ";"
-      "-print"))))
+     (sort
+      (process-lines
+       "find"
+       default-directory
+       "-maxdepth" "1"
+       "-type" "f"
+       "!" "-name" file
+       "-exec"
+       grep-program
+       "--color=never"
+       "-m"
+       "1"
+       "-e"
+       identifier
+       "{}"
+       ";"
+       "-print")
+      #'string-lessp))))
 
 (provide 'denote-retrieve)
 ;;; denote-retrieve.el ends here