[elpa] externals/emms 360fe83b17 2/3: * emms-bookmarks.el: Explicitly sort track bookmarks

[ELPA Syncer]

branch: externals/emms
commit 360fe83b17a23ae84f96c577da4a3ca07d654aa2
Author: Daniel Semyonov <daniel@dsemy.com>
Commit: Daniel Semyonov <daniel@dsemy.com>

    * emms-bookmarks.el: Explicitly sort track bookmarks
---
 emms-bookmarks.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/emms-bookmarks.el b/emms-bookmarks.el
index 1c43e2acb5..af71855f20 100644
--- a/emms-bookmarks.el
+++ b/emms-bookmarks.el
@@ -72,8 +72,9 @@
 TIME should be a reference point in seconds.
 TRACK should be an Emms track.
 TEST should be a numerical comparator predicate."
-  (let ((s (append (list (cons "time" time)) (copy-sequence 
(emms-bookmarks-get track)))))
-    (sort s #'(lambda (a b) (funcall test (cdr a) (cdr b))))
+  (let* ((s (append (list (cons "time" time))
+                    (copy-sequence (emms-bookmarks-get track))))
+         (s (sort s #'(lambda (a b) (funcall test (cdr a) (cdr b))))))
     (while (not (= time (cdar s)))
       (setq s (cdr s)))
     (when (cdr s)