From d1075eefa063bd98d165b6ed551d9fc96998be2d Mon Sep 17 00:00:00 2001 From: yonirabkin Date: Thu, 22 Sep 2005 16:58:00 +0000 Subject: remove emms-metaplaylist-mode code from emms-playlist-mode darcs-hash:20050922165801-be80e-ca5535f624ce98446b706f6dc3d183e18b1b1b2c.gz --- emms-playlist-mode.el | 20 +++----------------- 1 file changed, 3 insertions(+), 17 deletions(-) (limited to 'emms-playlist-mode.el') diff --git a/emms-playlist-mode.el b/emms-playlist-mode.el index b60d389..21aa337 100644 --- a/emms-playlist-mode.el +++ b/emms-playlist-mode.el @@ -49,7 +49,7 @@ (((type tty) (class mono)) :inverse-video t) (t :background "Blue")) - "Basic face for highlighting tracks in a playlist buffer." + "Face for the tracks in a playlist buffer." :group 'emms-playlist-mode) (defface emms-playlist-selected-face @@ -58,7 +58,7 @@ (((type tty) (class mono)) :inverse-video t) (t :background "blue3")) - "Basic face for highlighting the selected track." + "Face for highlighting the selected track." :group 'emms-playlist-mode) ;;; -------------------------------------------------------- @@ -216,21 +216,7 @@ FACE should be a... face." 'emms-playlist-selected-face 3)) nil) - -;;; -------------------------------------------------------- -;;; Playlists -;;; -------------------------------------------------------- - -(defun emms-playlist-buffers () - "Return a list of EMMS playlist buffers." - (let ((lis nil)) - (mapc (lambda (buf) - (with-current-buffer buf - (when emms-playlist-buffer-p - (setq lis (cons buf lis))))) - (buffer-list)) - lis)) - + ;;; -------------------------------------------------------- ;;; Saving/Restoring ;;; -------------------------------------------------------- -- cgit v1.2.3