[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[emms-help] Re: Now-playing message

From: Michael Olson
Subject: [emms-help] Re: Now-playing message
Date: Sun, 08 Apr 2007 21:34:15 -0400
User-agent: Gnus/5.110006 (No Gnus v0.6) Emacs/22.0.96 (gnu/linux)

Michael Olson <address@hidden> writes:

> (defun np-maybe ()
>   (emms-player-mpd-show
>    nil
>    (lambda (buffer desc)
>      (when (stringp desc)
>        (unless (and (stringp np-last)
>                     (string= np-last desc))
>          (setq np-last desc)
>          (message desc))))))

Oops, that should be:

(defun np-maybe ()
   (lambda (buffer desc)
     (when (and (stringp desc)
                (not (string= desc "")))
       (unless (and (stringp np-last)
                    (string= np-last desc))
         (setq np-last desc)
         (message "%s" desc))))))

Michael Olson -- FSF Associate Member #652 -- http://www.mwolson.org/
Interests: Lisp, text markup, protocols -- Jabber: mwolson_at_hcoop.net
  /` |\ | | | Projects: Emacs, Muse, ERC, EMMS, Planner, ErBot, DVC
 |_] | \| |_| Reclaim your digital rights by eliminating DRM.
      See http://www.defectivebydesign.org/what_is_drm for details.

Attachment: pgplSpjMU660A.pgp
Description: PGP signature

reply via email to

[Prev in Thread] Current Thread [Next in Thread]