diff options
| author | forcer <forcer> | 2006-06-05 05:33:00 +0000 |
|---|---|---|
| committer | forcer <mwolson@gnu.org> | 2006-06-05 05:33:00 +0000 |
| commit | 289268618b6a6edd6b5183fb363b15b3124854a9 (patch) | |
| tree | c8fa1906e543a8872f63d51ce529de74a7d754c0 | |
| parent | c275727ea01b65c94c253e8649b7035d37bf67e1 (diff) | |
Sort file names from `emms-source-file-directory-tree-function'.
darcs-hash:20060605053347-2189f-e2161a5d791596968f9d9e83c004451592324550.gz
| -rw-r--r-- | emms-source-file.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/emms-source-file.el b/emms-source-file.el index c234d04..6382780 100644 --- a/emms-source-file.el +++ b/emms-source-file.el @@ -178,9 +178,10 @@ value of `emms-source-file-default-directory'." "Return a list of all files under DIR that match REGEX. This function uses `emms-source-file-directory-tree-function'." (message "Building playlist...") - (let ((pl (funcall emms-source-file-directory-tree-function - dir - regex))) + (let ((pl (sort (funcall emms-source-file-directory-tree-function + dir + regex) + 'string<))) (message "Building playlist...done") pl)) |