diff options
Diffstat (limited to 'lisp/emms-mark.el')
-rw-r--r-- | lisp/emms-mark.el | 11 |
1 files changed, 5 insertions, 6 deletions
diff --git a/lisp/emms-mark.el b/lisp/emms-mark.el index 4f02c75..696fe2d 100644 --- a/lisp/emms-mark.el +++ b/lisp/emms-mark.el @@ -36,18 +36,17 @@ ;;; Code: (provide 'emms-mark) +(require 'cl-lib) (require 'emms) (require 'emms-playlist-mode) -(eval-when-compile - (require 'cl)) ;;{{{ set new description-function (defun emms-mark-track-description (track) "Return a description of the current track." - (assert (not (eq (default-value 'emms-track-description-function) - 'emms-mark-track-description)) - nil (concat "Do not set `emms-track-selection-function' to be" - " emms-mark-track-description.")) + (cl-assert (not (eq (default-value 'emms-track-description-function) + 'emms-mark-track-description)) + nil (concat "Do not set `emms-track-selection-function' to be" + " emms-mark-track-description.")) (concat " " (funcall (default-value 'emms-track-description-function) track))) |