From 1138edb067a5ba09d3db77faf6a96f654b052b74 Mon Sep 17 00:00:00 2001 From: William Xu Date: Wed, 21 Nov 2007 11:30:00 +0000 Subject: New var: emms-playlist-limit-hook. darcs-hash:20071121113028-cfa61-136ae25deb325c413688a975e09622d9a05f8b65.gz --- emms-playlist-limit.el | 10 ++++++++++ 1 file changed, 10 insertions(+) diff --git a/emms-playlist-limit.el b/emms-playlist-limit.el index a8c40f8..b79d45c 100644 --- a/emms-playlist-limit.el +++ b/emms-playlist-limit.el @@ -26,6 +26,15 @@ ;;; User Interfaces +(defgroup emms-playlist-limit nil + "Playlist limit module for EMMS." + :group 'emms) + +(defcustom emms-playlist-limit-hook nil + "Hooks to run after each limit operations." + :type 'symbol + :group 'emms-playing-limit) + (defvar emms-playlist-limit-enabled-p nil "If non-nil, emms playlist limit is enabled.") @@ -159,6 +168,7 @@ See `emms-info-mp3find-arguments' for possible options for NAME." (if pos (emms-playlist-select pos) (emms-playlist-first))) + (run-hooks 'emms-playlist-limit-hook) (emms-playlist-mode-center-current)))) -- cgit v1.2.3