From 789b5f8eb5577e680f10d8c46fe51abf2ea1385d Mon Sep 17 00:00:00 2001 From: Damien Elmes Date: Tue, 22 Aug 2006 10:05:00 +0000 Subject: browser: few compat fixes for emacs21 darcs-hash:20060822100508-4e3e3-a39abae41dd60465fd9e52c1c3214cb1e20f0a1b.gz --- emms-browser.el | 12 +++++++++++- 1 file changed, 11 insertions(+), 1 deletion(-) diff --git a/emms-browser.el b/emms-browser.el index 938a181..52a0eed 100644 --- a/emms-browser.el +++ b/emms-browser.el @@ -832,7 +832,7 @@ This will be a list of DB items." (interactive) (let* ((data (emms-browser-data-at-point))) (save-excursion - (next-line) + (next-line 1) (beginning-of-line) (dolist (data-item data) (emms-browser-insert-data-item data-item))))) @@ -1713,5 +1713,15 @@ If the track is not of TYPE, return t." (emms-track-get track 'last-played nil)) (time-less-p min-date last-played)))))) +;; -------------------------------------------------- +;; Compatability functions +;; -------------------------------------------------- + +(unless (fboundp 'with-selected-window) + (defalias 'with-selected-window 'save-selected-window)) + +(unless (fboundp 'run-mode-hooks) + (defalias 'run-mode-hooks 'run-hooks)) + (provide 'emms-browser) ;;; emms-browser.el ends here -- cgit v1.2.3