diff options
| author | william.xwl <william.xwl> | 2006-12-08 03:10:00 +0000 |
|---|---|---|
| committer | william.xwl <mwolson@gnu.org> | 2006-12-08 03:10:00 +0000 |
| commit | 13525d2c4185d0bf2bad4f9518b8a355ec745f62 (patch) | |
| tree | 2b3f86daed26a2aed26d792f4367148979ea4526 | |
| parent | a33416f6dcf0f9212b5680c814ce21b2c3315480 (diff) | |
emms-info-mp3info: Make use of `emms-i18n-call-process-simple'.
darcs-hash:20061208031029-e8fe6-fdb07b59286e2152d399670e2881a6648a17c887.gz
| -rw-r--r-- | emms-info-mp3info.el | 12 |
1 files changed, 3 insertions, 9 deletions
diff --git a/emms-info-mp3info.el b/emms-info-mp3info.el index 137bcce..15c6207 100644 --- a/emms-info-mp3info.el +++ b/emms-info-mp3info.el @@ -79,7 +79,9 @@ This is a useful element for `emms-info-functions'." (string-match "\\.[Mm][Pp]3\\'" (emms-track-name track))) (with-temp-buffer (when (zerop - (apply 'call-process + (apply (if (fboundp 'emms-i18n-call-process-simple) + 'emms-i18n-call-process-simple + 'call-process) emms-info-mp3info-program-name nil t nil (emms-track-name track) @@ -88,13 +90,6 @@ This is a useful element for `emms-info-functions'." (while (looking-at "^\\([^=\n]+\\)=\\(.*\\)$") (let ((name (intern (match-string 1))) (value (match-string 2))) - (and (boundp 'emms-cache-file-coding-system) - (not (eq emms-info-mp3info-coding-system - emms-cache-file-coding-system)) - (setq value (decode-coding-string - (encode-coding-string - value emms-cache-file-coding-system) - emms-info-mp3info-coding-system))) (when (> (length value) 0) (emms-track-set track @@ -104,6 +99,5 @@ This is a useful element for `emms-info-functions'." value)))) (forward-line 1)))))) - (provide 'emms-info-mp3info) ;;; emms-info-mp3info.el ends here |