From 7a5da34e1192dd7a32545a7c0edbd9bb69e7922e Mon Sep 17 00:00:00 2001 From: Yoni Rabkin Date: Mon, 19 Mar 2018 19:09:42 -0400 Subject: * lisp/emms-tag-editor.el: mid3v2 replaces mp3info mp3info only works with 1.x tags. --- lisp/emms-tag-editor.el | 12 ++++++++++-- 1 file changed, 10 insertions(+), 2 deletions(-) diff --git a/lisp/emms-tag-editor.el b/lisp/emms-tag-editor.el index 022990b..36db1d3 100644 --- a/lisp/emms-tag-editor.el +++ b/lisp/emms-tag-editor.el @@ -117,7 +117,15 @@ the 'name directly. See also `emms-tag-editor-default-parser'.") (defvar emms-tag-editor-tagfile-functions - '(("mp3" "mp3info" + '(("mp3" "mid3v2" + ((info-artist . "a") + (info-title . "t") + (info-album . "A") + (info-tracknumber . "T") + (info-year . "y") + (info-genre . "g") + (info-note . "c"))) + ("mp3" "mp3info" ((info-artist . "a") (info-title . "t") (info-album . "l") @@ -625,7 +633,7 @@ With prefix argument, bury the tag edit buffer." (dolist (tag emms-tag-editor-tags) (when (setq val (emms-track-get track (car tag))) (emms-track-set old (car tag) val))) - ;; use mp3info to change tag in mp3 file + ;; use external program to change tags in the file (when (and (eq (emms-track-get track 'type) 'file) (file-writable-p (emms-track-name track)) (setq func (assoc (file-name-extension filename) -- cgit v1.2.3