;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (require 'emms-info) #@35 EMMS info mp3info version string. (defvar emms-info-mp3info-version "0.2 $Revision: 1.10 $" (#$ . 108)) (byte-code "\300\301\302\303\304\305%\210\306\307\310\311\312DD\313\314\315%\210\306\316\310\311\317DD\320\314\321%\210\306\322\310\311\323DD\324\314\325%\207" [custom-declare-group emms-info-mp3info nil "An EMMS-info method for getting/setting ID3v1 tags, using the\nexternal mp3info program" :group emms-info custom-declare-variable emms-info-mp3info-coding-system funcall function #[0 "\300\207" [utf-8] 1] "Coding system used in the output of mp3info." :type coding-system emms-info-mp3info-program-name #[0 "\300\207" [#1="mp3info"] 1 #1#] "The name/path of the mp3info tag program." string emms-info-mp3find-arguments #[0 "\300\301D\207" ["-p" "info-artist=%a\\ninfo-title=%t\\ninfo-album=%l\\ninfo-tracknumber=%n\\ninfo-year=%y\\ninfo-genre=%g\\ninfo-note=%c\\ninfo-playing-time=%S\\n"] 2] "The argument to pass to `emms-info-mp3info-program-name'.\nThis should be a list of info-flag=value lines." (repeat string)] 6) #@97 Add track information to TRACK. This is a useful element for `emms-info-functions'. (fn TRACK) (defalias 'emms-info-mp3info #[257 "\302!\205p\303\304\305!\"\205p\306\307\310\"r\211q\210\311\312\"\216\313\314\315!\203'\315\202(\316\317\310\317\320 \305\n!C\"&\321U\205meb\210\322\323!\205m\324\325\326!!\325\327!\211G\321V\203e\330\211\331=\203b\332!\202c#\210\266\326y\210\202>*\262\207" [emms-info-mp3info-program-name emms-info-mp3find-arguments emms-track-file-p string-match "\\.[Mm][Pp]3\\'" emms-track-name generate-new-buffer " *temp*" t make-closure #[0 "\301\300!\205 \302\300!\207" [V0 buffer-name kill-buffer] 2] apply fboundp emms-i18n-call-process-simple call-process nil append 0 looking-at "^\\([^=\n]+\\)=\\(.*\\)$" intern match-string 1 2 emms-track-set info-playing-time string-to-number] 12 (#$ . 1144)]) (provide 'emms-info-mp3info)