[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)))))