From 4a4a358409fad05c997465b9c3ad800c24f7ec06 Mon Sep 17 00:00:00 2001 From: Petteri Hintsanen Date: Thu, 11 Feb 2021 00:09:41 +0200 Subject: 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 e0b3906..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. -- cgit v1.2.3