Hi !
In the last line, `filename' is undefined. I'm not using it, so
can't fix it..(it comes up as compiler warnings)
(defun emms-tag-editor-tag-file (track program tags)
"Change TAGS in FILE, using PROGRAM.
Valid tags are given by `emms-tag-editor-tagfile-functions'."
(let (args val)
(mapc (lambda (tag)
(setq val (emms-track-get track (car tag)))
(if (and val (stringp val))
(setq args (append (list (concat "-" (cdr tag)) val) args))))
tags)
(apply 'call-process program
nil (get-buffer-create emms-tag-editor-log-buffer) nil
(nconc args (list filename)))))
- William
_______________________________________________
Emms-help mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emms-help
