aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--lisp/emms-metaplaylist-mode.el10
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/emms-metaplaylist-mode.el b/lisp/emms-metaplaylist-mode.el
index e1ccda7..4f84a01 100644
--- a/lisp/emms-metaplaylist-mode.el
+++ b/lisp/emms-metaplaylist-mode.el
@@ -139,11 +139,11 @@
(when (not emms-playlist-buffer)
(error "no current playlist buffer"))
(goto-char (point-min))
- (when (not (search-forward-regexp
- (or (buffer-name emms-playlist-buffer)
- "")
- (point-max) t))
- (goto-char (point-min)))
+ (when (not
+ (search-forward-regexp (regexp-quote
+ (buffer-name emms-playlist-buffer))
+ (point-max) t))
+ (error "cannot not find the current playlist buffer"))
(goto-char (point-at-bol)))
(defun emms-metaplaylist-mode-create ()