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

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

[elpa] externals/emms 4a4a358 23/80: Remove emms-info-native return valu


From: Stefan Monnier
Subject: [elpa] externals/emms 4a4a358 23/80: Remove emms-info-native return value
Date: Wed, 17 Mar 2021 18:42:23 -0400 (EDT)

branch: externals/emms
commit 4a4a358409fad05c997465b9c3ad800c24f7ec06
Author: Petteri Hintsanen <petterih@iki.fi>
Commit: Petteri Hintsanen <petterih@iki.fi>

    Remove emms-info-native return value
    
    The value was wrong and not used anyway.
---
 emms-info-native.el | 11 +++--------
 1 file changed, 3 insertions(+), 8 deletions(-)

diff --git a/emms-info-native.el b/emms-info-native.el
index e0b3906a..4f5555a 100644
--- a/emms-info-native.el
+++ b/emms-info-native.el
@@ -661,22 +661,17 @@ Return the text in BYTES as string."
 
 (defun emms-info-native (track)
   "Set info fields for TRACK.
-Supports Ogg Vorbis/Opus, FLAC, and MP3 files.
-
-Return t if TRACK was updated, nil otherwise."
+Supports Ogg Vorbis/Opus, FLAC, and MP3 files."
   (let* ((filename (emms-track-name track))
-         (info-fields (emms-info-native--decode-info-fields filename))
-         update-flag)
+         (info-fields (emms-info-native--decode-info-fields filename)))
     (dolist (field info-fields)
       (let ((name (intern (concat "info-" (car field))))
             (value (cdr field)))
-        (setq update-flag (or update-flag name))
         (emms-track-set track
                         name
                         (if (eq name 'info-playing-time)
                             (string-to-number value)
-                          value))))
-    update-flag))
+                          value))))))
 
 (defun emms-info-native--decode-info-fields (filename)
   "Decode info fields from FILENAME.



reply via email to

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