diff options
| author | Yoni Rabkin <yoni@rabkins.net> | 2018-03-19 19:09:42 -0400 |
|---|---|---|
| committer | Yoni Rabkin <yoni@rabkins.net> | 2018-03-19 19:09:42 -0400 |
| commit | 7a5da34e1192dd7a32545a7c0edbd9bb69e7922e (patch) | |
| tree | d2ae3c8cd3c24e2a4a2b717df1f527689bb39b8f | |
| parent | 0459003a1686b5742e660d08e7c936d1b06e8e7c (diff) | |
* lisp/emms-tag-editor.el: mid3v2 replaces mp3info
mp3info only works with 1.x tags.
| -rw-r--r-- | lisp/emms-tag-editor.el | 12 |
1 files 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) |