From fa8f64e6a98373922c88af01d87046af2497d03d Mon Sep 17 00:00:00 2001 From: Petteri Hintsanen Date: Mon, 22 Feb 2021 22:05:26 +0200 Subject: Fix whitespace trimming Don't try to trim nil. --- emms-info-native.el | 13 +++++++------ 1 file changed, 7 insertions(+), 6 deletions(-) diff --git a/emms-info-native.el b/emms-info-native.el index d0c9777..0c7a220 100644 --- a/emms-info-native.el +++ b/emms-info-native.el @@ -753,12 +753,13 @@ Supports Ogg Vorbis/Opus, FLAC, and MP3 files." (info-fields (emms-info-native--decode-info-fields filename))) (dolist (field info-fields) (let ((name (intern (concat "info-" (car field)))) - (value (string-trim-right (cdr field)))) - (emms-track-set track - name - (if (eq name 'info-playing-time) - (string-to-number value) - value)))))) + (value (cdr field))) + (unless (zerop (length value)) + (emms-track-set track + name + (if (eq name 'info-playing-time) + (string-to-number value) + (string-trim-right value)))))))) (defun emms-info-native--decode-info-fields (filename) "Decode info fields from FILENAME. -- cgit v1.2.3