diff options
-rw-r--r-- | emms-tag-editor.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/emms-tag-editor.el b/emms-tag-editor.el index 275bc75..441528b 100644 --- a/emms-tag-editor.el +++ b/emms-tag-editor.el @@ -133,7 +133,7 @@ See also `emms-tag-editor-tag-file' and `emms-tag-editor-tag-ogg'.") (mapc (lambda (tag) (let ((info-tag (intern (concat "info-" tag)))) (when (> (length (setq val (emms-track-get track info-tag))) 0) - (setq args (append (list "-t" (concat tag "=" val)) args))))) + (setq args (append (list "-t" (concat (upcase tag) "=" val)) args))))) '("artist" "title" "album" "tracknumber" "date" "genre" "note")) (when args (apply #'call-process "vorbiscomment" nil |