emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/emms 925c16244b 2/2: * emms-playlist-mode.el: remove un


From: ELPA Syncer
Subject: [elpa] externals/emms 925c16244b 2/2: * emms-playlist-mode.el: remove unused lexical variable
Date: Sun, 7 Jan 2024 21:57:49 -0500 (EST)

branch: externals/emms
commit 925c16244b9e7579c8fad264e3f4d01c5a10c413
Author: Yoni Rabkin <yrk@gnu.org>
Commit: Yoni Rabkin <yrk@gnu.org>

    * emms-playlist-mode.el: remove unused lexical variable
---
 emms-playlist-mode.el | 13 +++++--------
 1 file changed, 5 insertions(+), 8 deletions(-)

diff --git a/emms-playlist-mode.el b/emms-playlist-mode.el
index e0d37579c0..8282e348cb 100644
--- a/emms-playlist-mode.el
+++ b/emms-playlist-mode.el
@@ -363,14 +363,11 @@ With a prefix arg, open the `dired' buffer in 
OTHER-WINDOW."
   (emms-with-inhibit-read-only-t
    (let ((track (emms-playlist-track-at)))
      (when track
-       (let ((track-region (emms-property-region (point)
-                                                'emms-track)))
-        (ignore track-region)
-        (when (and emms-player-playing-p
-                   (emms-playlist-selected-track-at-p))
-          (emms-stop)
-          (delete-overlay emms-playlist-mode-selected-overlay)
-          (setq emms-playlist-mode-selected-overlay nil))))
+       (when (and emms-player-playing-p
+                 (emms-playlist-selected-track-at-p))
+        (emms-stop)
+        (delete-overlay emms-playlist-mode-selected-overlay)
+        (setq emms-playlist-mode-selected-overlay nil)))
      (let ((kill-whole-line emms-playlist-mode-kill-whole-line-p))
        (goto-char (line-beginning-position))
        (kill-line)))))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]