;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. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (byte-code "\300\301!\210\302\303\304\305\306\301%\210\307\310\311\312\313DD\314\315\316%\210\307\317\311\312\320DD\321\315\322%\207" [require emms-info custom-declare-group emms-info-ogginfo nil "An EMMS-info method for getting, using the external ogginfo\nprogram" :group custom-declare-variable emms-info-ogginfo-coding-system funcall function #[0 "\300\207" [utf-8] 1] "Coding system used in the output of ogginfo." :type coding-system emms-info-ogginfo-program-name #[0 "\300\207" [#1="ogginfo"] 1 #1#] "The name/path of the ogginfo tag program." string] 6) #@97 Add track information to TRACK. This is a useful element for `emms-info-functions'. (fn TRACK) (defalias 'emms-info-ogginfo #[257 "\301!\205\254\302\303\304!\"\205\254\305\306!r\211q\210\307\310\311\312\313!\314\"\315$\216\316\317\320\317\304!%\210eb\210\321\322\317\320#\203i\323\324\325!!\323\324\315!!\326_\\\327\330#\210\327\331#\210\327\332#\210\327\333\304\n!#\266eb\210\321\334d\320#\205\251\325y\310U\205\251\335\336!\203t\324\325!\324\315!\310GW\203\244\310GW\203\244\327\337\340\324\325!P\227!\324\315!#\210\266\202t*\262\207" [emms-info-ogginfo-program-name emms-track-file-p string-match "\\.[Oo][Gg][Gg]\\'" emms-track-name generate-new-buffer " *temp*" make-byte-code 0 "\301\300!\205 \302\300!\207" vconcat vector [buffer-name kill-buffer] 2 call-process nil t re-search-forward "Playback length: \\([0-9]*\\)m:\\([0-9]*\\)" string-to-number match-string 1 60 emms-track-set info-playing-time info-playing-time-min info-playing-time-sec info-file "^.*\\.\\.\\.$" looking-at "^ \\(.*?\\)=\\(.*\\)$" intern "info-"] 12 (#$ . 971)]) (provide 'emms-info-ogginfo)