diff options
Diffstat (limited to 'emacs/.emacs.d/lisp/my/my-emms.el')
| -rw-r--r-- | emacs/.emacs.d/lisp/my/my-emms.el | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/emacs/.emacs.d/lisp/my/my-emms.el b/emacs/.emacs.d/lisp/my/my-emms.el index fd3c73d..e6fb0e2 100644 --- a/emacs/.emacs.d/lisp/my/my-emms.el +++ b/emacs/.emacs.d/lisp/my/my-emms.el @@ -508,8 +508,11 @@ character." If the last command is `emms-playlist-mode-play-smart', then set `my-emms-score-delta' to 2." - (when (eq last-command 'emms-playlist-mode-play-smart) - (setq my-emms-score-delta 2))) + (if (not (eq last-command 'emms-playlist-mode-play-smart)) + (setq my-emms-score-delta 1) + (setq my-emms-score-delta 2) + (setq last-command nil)) + ) (defun my-emms-wrapped () "Print top 5 scored tracks." |