From: Jose Antonio Ortega Ruiz <[email protected]>
This is the second patch addressing the null track fields issue (please see
my previous email). In this case, before trying to STRING-MATCH in a search,
we check that the track's field is non-null.
Thanks!
jao
---
lisp/emms-browser.el | 6 +++---
1 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/lisp/emms-browser.el b/lisp/emms-browser.el
index d1c85d7..5286d75 100644
--- a/lisp/emms-browser.el
+++ b/lisp/emms-browser.el
@@ -1509,9 +1509,9 @@ included."
(dolist (item search-list)
(setq matched nil)
(dolist (field (car item))
- (when (string-match (cadr item)
- (emms-track-get track field ""))
- (setq matched t)))
+ (let ((track-field (emms-track-get track field "")))
+ (when (and track-field (string-match (cadr item) track-field))
+ (setq matched t))))
(unless matched
(setq no-match t)))
(not no-match)))
--
1.6.2
_______________________________________________
Emms-patches mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emms-patches
