;ELC ;;; Compiled ;;; in Emacs version 26.3 ;;; with all optimizations. ;;; This file uses dynamic docstrings, first added in Emacs 19.29. ;;; This file does not contain utf-8 non-ASCII characters, ;;; and so can be loaded in Emacs versions earlier than 23. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (require 'emms-info) #@35 EMMS info mp3info version string. (defvar emms-info-mp3info-version "0.2 $Revision: 1.10 $" (#$ . 429)) (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!\205v\303\304\305!\"\205v\306\307!r\211q\210\310\311\312\313\314!\315\"\316$\216\317\320\321!\203-\321\202.\322\323\324\323\325 \305\n!C\"&\311U\205seb\210\326\327!\205s\330\331\332!!\331\316!\211G\311V\203k\333\211\334=\203h\335!\202i#\210\266\332y\210\202D*\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*" make-byte-code 0 "\301\300!\205 \302\300!\207" vconcat vector [buffer-name kill-buffer] 2 apply fboundp emms-i18n-call-process-simple call-process nil t append looking-at "^\\([^=\n]+\\)=\\(.*\\)$" intern match-string 1 emms-track-set info-playing-time string-to-number] 12 (#$ . 1465)]) (provide 'emms-info-mp3info)