diff options
Diffstat (limited to 'lisp/emms-compat.el')
-rw-r--r-- | lisp/emms-compat.el | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/lisp/emms-compat.el b/lisp/emms-compat.el index f5ede0b..ba233ea 100644 --- a/lisp/emms-compat.el +++ b/lisp/emms-compat.el @@ -67,6 +67,26 @@ EMMS release version number." (< (nth 1 t1) (nth 1 t2))))) +;;; Highline + +(defun emms-activate-highlighting-mode () + "Activate highline mode." + (if (featurep 'xemacs) + (progn + (require 'highline) + (highline-local-mode 1)) + (progn + (require 'hl-line) + (hl-line-mode 1)))) + +(defun emms-line-highlight () + "Highlight the current line. You must call +emms-activate-highlighting-mode beforehand." + (if (featurep 'xemacs) + (highline-highlight-current-line) + (hl-line-highlight))) + + ;;; Movement and position (defun emms-move-beginning-of-line (arg) |