;ELC ;;; Compiled by heimdall@baldur on Fri Feb 1 18:34:53 2008 ;;; from file /home/heimdall/repos/emms/emms-mode-line-icon.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-mode-line-icon.el' was compiled for Emacs 19.29 or later")) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (require 'emms-mode-line) #@54 Color of the little icon displayed in the mode-line. (defvar emms-mode-line-icon-color "black" (#$ . 627)) #@196 String to put before the icon, in the mode-line. For example, if you want to have something like : [ Foo - The Foo Song ] You should set it to "[", and set emms-mode-line-format to "%s ]" (defvar emms-mode-line-icon-before-format "" (#$ . 741)) (byte-code "\302B\303\302!\204\304\302\305\306\307\310\311\312\313 \314Q\257\"\210\302\207" [current-load-list emms-mode-line-icon-color emms-mode-line-icon-image-cache default-boundp set-default image :type xpm :ascent center :data "/* XPM */\nstatic char *note[] = {\n/* width height num_colors chars_per_pixel */\n\" 10 11 2 1\",\n/* colors */\n\". c " "\",\n\"# c None s None\",\n/* pixels */\n\"###...####\",\n\"###.#...##\",\n\"###.###...\",\n\"###.#####.\",\n\"###.#####.\",\n\"#...#####.\",\n\"....#####.\",\n\"#..######.\",\n\"#######...\",\n\"######....\",\n\"#######..#\"};"] 11) (defalias 'emms-mode-line-icon-function #[nil "\302\303\304\305 #\306 R\207" [emms-mode-line-icon-before-format emms-mode-line-icon-image-cache " " emms-propertize "NP:" display emms-mode-line-playlist-current] 6]) (byte-code "\301\302\303\304\305#\210\306\307!\207" [emms-mode-line-mode-line-function emms-mode-line-icon-function put emms-mode-line-string risky-local-variable t provide emms-mode-line-icon] 4)