diff options
-rw-r--r-- | emms-lyric.el | 2 | ||||
-rw-r--r-- | emms-mode-line.el | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/emms-lyric.el b/emms-lyric.el index d6f61da..bf6ce23 100644 --- a/emms-lyric.el +++ b/emms-lyric.el @@ -152,7 +152,7 @@ looking up in `emms-lyric-dir'." emms-lyric-pause-time nil emms-lyric-elapsed-time 0) (when (and emms-lyric-display-p - (let ((file (cdaddr (emms-playlist-current-track)))) + (let ((file (cdaddr (emms-playlist-selected-track)))) (emms-lyric-read-file (replace-regexp-in-string (file-name-extension file) "lrc" file)))) diff --git a/emms-mode-line.el b/emms-mode-line.el index 87c0f9d..33e2da0 100644 --- a/emms-mode-line.el +++ b/emms-mode-line.el @@ -53,7 +53,7 @@ (defun emms-mode-line-playlist-current () "Format the currently playing song" - (format emms-mode-line-format (emms-playlist-current))) + (format emms-mode-line-format (emms-track-description (emms-playlist-selected-track)))) (defvar emms-mode-line-initial-titlebar frame-title-format) |