diff options
| author | Yoni Rabkin <yonirabkin@member.fsf.org> | 2014-05-29 14:17:24 -0400 |
|---|---|---|
| committer | Yoni Rabkin <yonirabkin@member.fsf.org> | 2014-05-29 14:17:24 -0400 |
| commit | e62987b494c8ca8a63adec30e92aab3443ba0951 (patch) | |
| tree | 94f18293e86c92c96699e7ed7ab5b77b943d5394 /lisp | |
| parent | 603fbd85e7ac35c2b8edbcd4c15f5d74c767aaaf (diff) | |
* lisp/emms.el: Add new display function.
Idea from by Ian D <dunni@gnu.org>.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/emms.el | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/lisp/emms.el b/lisp/emms.el index 5c2a4dd..1e4a1f7 100644 --- a/lisp/emms.el +++ b/lisp/emms.el @@ -539,6 +539,14 @@ Set `emms-completing-read' to determine which function to use. See `completing-read' for a description of ARGS." (apply emms-completing-read-function args)) +(defun emms-display-modes () + "Display the current EMMS play modes." + (interactive) + (message "repeat playlist: %s, repeat track: %s, random: %s" + (if emms-repeat-playlist "yes" "no") + (if emms-repeat-track "yes" "no") + (if emms-random-playlist "yes" "no"))) + ;;; Compatibility functions |