diff options
| author | Johnathan Rabkin <yonirabkin@member.fsf.org> | 2012-09-20 07:32:31 -0400 |
|---|---|---|
| committer | Johnathan Rabkin <yonirabkin@member.fsf.org> | 2012-09-20 07:32:31 -0400 |
| commit | d73e52d4d6abb324e93584d01f53d360f57834a9 (patch) | |
| tree | 59db439f90aad980a723df8e47f52cbd5864c8b9 /lisp/emms-browser.el | |
| parent | d5666db21b9e2832eedf4d63a35d29f7fea7135b (diff) | |
* lisp/emms-browser.el: Fix bug in use of compare-strings.
The standard use of compare-strings in this manner is (eq
t (compare-st...)).
Diffstat (limited to 'lisp/emms-browser.el')
| -rw-r--r-- | lisp/emms-browser.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emms-browser.el b/lisp/emms-browser.el index c52f326..271ac73 100644 --- a/lisp/emms-browser.el +++ b/lisp/emms-browser.el @@ -674,7 +674,7 @@ compilations, etc." (sort-lines nil (point-min) (point-max))))) (defun case-fold-string= (a b) - (compare-strings a nil nil b nil nil t)) + (eq t (compare-strings a nil nil b nil nil t))) (defun case-fold-string-hash (a) (sxhash (upcase a))) |