From 1ba1707f398b541baee516a9314b1ae1cc2f5bae Mon Sep 17 00:00:00 2001 From: Pierre Neidhardt Date: Fri, 29 Dec 2017 22:01:32 +0100 Subject: emms-browser: Add mode hook --- lisp/emms-browser.el | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/emms-browser.el b/lisp/emms-browser.el index 12d3411..1f4981a 100644 --- a/lisp/emms-browser.el +++ b/lisp/emms-browser.el @@ -295,6 +295,9 @@ ;; Variables and configuration ;; -------------------------------------------------- +(defvar emms-browser-mode-hook nil + "Emms browser mode hook.") + (defgroup emms-browser nil "*The Emacs Multimedia System browser" :prefix "emms-browser-" @@ -553,7 +556,9 @@ example function is `emms-browse-by-artist'." (setq buffer-read-only t) (unless no-update - (setq emms-browser-buffer (current-buffer)))) + (setq emms-browser-buffer (current-buffer))) + + (run-hooks 'emms-browser-mode-hook)) (defun emms-browser-new-buffer () "Create a new browser buffer, and switch to it." -- cgit v1.2.3