emms-help
[Top][All Lists]
Advanced

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

[emms-help] Re: playlist buffer


From: Sebastian Luque
Subject: [emms-help] Re: playlist buffer
Date: Sun, 09 Jul 2006 18:46:58 -0500
User-agent: Gnus/5.110006 (No Gnus v0.6) Emacs/22.0.50 (gnu/linux)

Hi,


Yoni Rabkin Katzenell <address@hidden> wrote:

[...]

> This functionality works fine in Emms. I'm refering to the Darcs
> version, not the obsolete CVS version of Emms.

I'm getting:


,-----[ C-h v emms-version RET ]
| emms-version is a variable defined in `emms.el'.
| Its value is "2.0"
| 
| Documentation:
| EMMS version string.
| 
| [back]
`-----

which I got from the Debian testing branch.


> The interactive function `emms-playlist-mode-go-popup' should produce a
> vertically split window as the default behaviour.

> The variable `emms-playlist-mode-window-width' is user customizable and
> determines the size of the vertical split. It defaults to 25.

Thanks, that's exactly what I was hoping for.

Is there some option to have the playlist window be killed upon hitting
'q' (as was the case in the previous versions)?

The only other thing I can't find is a way to customize the strings shown.
In the previous version I was using, the list included the base name of
the files, but now they're showing as:

file: /path/to/file

which can be quite long.  Is this handled by
emms-track-description-function.  I have set that variable to the
following function (stolen from somewhere):

(defun my-emms-track-description (track)
  "Return a nice description of TRACK."
  (let ((artist (emms-track-get track 'info-artist))
        (title (emms-track-get track 'info-title))
        (name (emms-track-get track 'name))
        (type (emms-track-type track)))
    (cond ((and (stringp artist) (not (string= artist ""))
                (stringp title) (not (string= title "")))
           (let ((desc (format "%s - %s" artist title)))
             (if (memq type '(file url))
                 desc
               (concat (symbol-name type) ": " desc))))
          ((and (stringp title) (not (string= title "")))
           (my-upcase-initials title))
          ((null name)
           "Invalid track!")
          ((memq type '(url streamlist))
           "")
          (t
           (concat (symbol-name type) ": " name)))))


Thanks a lot for your help.


Cheers,

-- 
Seb





reply via email to

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