Record programs error in log buffer

darcs-hash:20070308141209-94065-e42c62f7816a62ada269de9ed57d14fa05289a6f.gz

1 files changed, 4 insertions, 2 deletions

diff --git a/emms-tag-editor.el b/emms-tag-editor.el
index 3ba2489..62d0e88 100644
--- a/emms-tag-editor.el
+++ b/emms-tag-editor.el
@@ -134,7 +134,9 @@ See also `emms-tag-editor-tag-file' and `emms-tag-editor-tag-ogg'.
                 (setq args (append (list "-t" (concat tag "=" val)) args)))))
           '("artist" "title" "album" "tracknumber" "date" "genre" "note"))
     (when args
-      (apply #'call-process "vorbiscomment" nil nil nil
+      (apply #'call-process "vorbiscomment" nil
+             (get-buffer-create emms-tag-editor-log-buffer)
+             nil
              "-w"
              (append args (list (emms-track-name track)))))))
 
@@ -146,7 +148,7 @@ See also `emms-tag-editor-tag-file' and `emms-tag-editor-tag-ogg'.
               (setq args (append (list (concat "-" (cdr tag)) val) args))))
           tags)
     (apply 'call-process program
-           nil nil nil
+           nil (get-buffer-create emms-tag-editor-log-buffer) nil
            filename args)))
 
 (defun emms-tag-editor-get-format (track)