--- emms-info-mp3info.el.orig	2007-03-23 12:22:07.000000000 +0900
+++ emms-info-mp3info.el	2007-04-07 21:09:18.330500800 +0900
@@ -84,8 +84,8 @@
                       'call-process)
                     emms-info-mp3info-program-name
                     nil t nil
-                    (emms-track-name track)
-                    emms-info-mp3find-arguments))
+                    (append emms-info-mp3find-arguments
+                            (list (emms-track-name track)))))
         (goto-char (point-min))
         (while (looking-at "^\\([^=\n]+\\)=\\(.*\\)$")
           (let ((name (intern (match-string 1)))
--- emms-tag-editor.el.orig	2007-03-23 12:22:08.000000000 +0900
+++ emms-tag-editor.el	2007-04-07 21:09:55.483924800 +0900
@@ -393,7 +393,7 @@
               (setq need-sync t)
               ;; register to emms-cache-db
               (funcall emms-cache-modified-function)
-              (funcall emms-cache-set-function filename 'file old))
+              (funcall emms-cache-set-function 'file filename old))
             ;; set tags to original track
             (dolist (tag emms-tag-editor-tags)
               (when (setq val (emms-track-get track (car tag)))
