aboutsummaryrefslogtreecommitdiff
path: root/emms-mode-line-icon.el
diff options
context:
space:
mode:
authorMichael Olson <mwolson@gnu.org>2006-04-01 23:26:00 +0000
committerMichael Olson <mwolson@gnu.org>2006-04-01 23:26:00 +0000
commit438e7ec52497afc1aa5799f13d83156ccfda1f15 (patch)
treedeae711aca2c4dd535d9f999c9c05059621bc5ed /emms-mode-line-icon.el
parentda7d1d0ebae7e4b6d8027a7fec3eef0c3816f2b6 (diff)
Fix a variety of compilation errors and warnings.
darcs-hash:20060401232610-1bfb2-5fe5e4892c94e29a59738bf0d27e7e91ad68f2ed.gz
Diffstat (limited to 'emms-mode-line-icon.el')
-rw-r--r--emms-mode-line-icon.el7
1 files changed, 3 insertions, 4 deletions
diff --git a/emms-mode-line-icon.el b/emms-mode-line-icon.el
index 04699f3..b823bcf 100644
--- a/emms-mode-line-icon.el
+++ b/emms-mode-line-icon.el
@@ -41,8 +41,8 @@ For example, if you want to have something like :
\[ <icon> Foo - The Foo Song ]
You should set it to \"[\", and set emms-mode-line-format to \"%s ]\"")
-(setq emms-mode-line-icon-image-cache
- `(image :type xpm :ascent center :data ,(concat "/* XPM */
+(defvar emms-mode-line-icon-image-cache
+ `(image :type xpm :ascent center :data ,(concat "/* XPM */
static char *note[] = {
/* width height num_colors chars_per_pixel */
\" 10 11 2 1\",
@@ -67,8 +67,7 @@ static char *note[] = {
(concat " "
emms-mode-line-icon-before-format
(propertize "NP:" 'display emms-mode-line-icon-image-cache)
- (format emms-mode-line-format (emms-info-file-info-song-artist
- (emms-playlist-current-selected-track)))))
+ (emms-mode-line-playlist-current)))
(setq emms-mode-line-mode-line-function 'emms-mode-line-icon-function)