;ELC ;;; Compiled by heimdall@baldur on Fri Feb 1 18:34:49 2008 ;;; from file /home/heimdall/repos/emms/emms-info.el ;;; in Emacs version 23.0.60.1 ;;; with all optimizations. ;;; This file uses dynamic docstrings, first added in Emacs 19.29. (if (and (boundp 'emacs-version) (< (aref emacs-version (1- (length emacs-version))) ?A) (or (and (boundp 'epoch::version) epoch::version) (string-lessp emacs-version "19.29"))) (error "`emms-info.el' was compiled for Emacs 19.29 or later")) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (byte-code "\300\301!\210\300\302!\210\303\304\305\306\307\301%\207" [require emms later-do custom-declare-group emms-info nil "*Track information. ID3, OGG, etc." :group] 6) #@186 *Non-nil when EMMS should update track information if the file changes. This will cause hard drive activity on track loading. If this is too annoying for you, set this variable to nil. (custom-declare-variable 'emms-info-auto-update 't '(#$ . -757) :type 'boolean :group 'emms-info) #@121 *Non-nil when track information should be loaded asynchronously. This requires `later-do', which should come with EMMS. (custom-declare-variable 'emms-info-asynchronously 't '(#$ . -1047) :type 'boolean :group 'emms-info) #@184 *Non-zero will report progress information every number of tracks. The default is to display a message every 200 tracks. This variable is only used when adding tracks asynchronously. (custom-declare-variable 'emms-info-report-each-num-tracks '200 '(#$ . -1276) :type 'integer :group 'emms-info) #@86 *Functions which add information to tracks. Each is called with a track as argument. (custom-declare-variable 'emms-info-functions 'nil '(#$ . -1577) :type 'hook :group 'emms-info) #@48 Number of tracks we're waiting for to be done. (defvar emms-info-asynchronous-tracks 0 (#$ . 1764)) #@110 Initialize TRACK with emms-info information. This is a suitable value for `emms-track-initialize-functions'. (defalias 'emms-info-initialize-track #[(track) "\204\303 !\207\nT\304\303 \"\207" [emms-info-asynchronously track emms-info-asynchronous-tracks emms-info-really-initialize-track later-do] 3 (#$ . 1871)]) #@63 Really initialize TRACK. Return t when the track got changed. (defalias 'emms-info-really-initialize-track #[(track) "\205\306 !\307 \303\"\307 \302\"\211\203! \203!\310 \f\"\2034\311\312 \"\210\f\2030\313 \303\f#\210\314 !\210 \205bS\315!\203J\316\317!\202b\315!?\205b\315\320\"!\205b\316\321\"+\207" [emms-info-auto-update track name info-mtime file-mtime emms-info-asynchronously emms-info-track-file-mtime emms-track-get emms-time-less-p run-hook-with-args emms-info-functions emms-track-set emms-track-updated zerop message "EMMS: All track information loaded." mod "EMMS: %d tracks to go.." emms-info-asynchronous-tracks emms-info-report-each-num-tracks] 6 (#$ . 2195)]) #@70 Return the mtime of the file of TRACK, if any. Return nil otherwise. (defalias 'emms-info-track-file-mtime #[(track) "\301!\302=\205\303\304\305!!8\207" [track emms-track-type file 5 file-attributes emms-track-name] 4 (#$ . 2907)]) #@44 Return a description of the current track. (defalias 'emms-info-track-description #[(track) "\303\304\"\303\305\"\211\203 \203\306\307\n #\202\310!*\207" [track title artist emms-track-get info-artist info-title format "%s - %s" emms-track-simple-description] 5 (#$ . 3149)]) (provide 'emms-info)