Hello!
Since resolve (AKA Damien E.) added covers support to the browser, I
played with it and started enjoying it. If your covers, like mine, have
various names and sizes, here's a command to run to get them to a
standard size:
find /path/to/music/ -iname "*.jpg" -exec convert -resize 100x100 "{}"
"{}-emms.jpg" \;
Now define a custom function :
(defun my-emms-browser-covers (path size)
"Ugly and not lispish, but works."
(let* ((files (directory-files (file-name-directory path)))
(covr (catch :found
(dolist (item files)
(if (string-match "-emms.jpg$" item)
(throw :found item))))))
(if covr
(concat (file-name-directory path) covr))))
(setq emms-browser-covers 'my-emms-browser-covers)
With this you'll have the first filename matching -emms.jpg in every
folder where a cover is. If you have several cover files in a folder,
just keep only one ending in -emms.jpg. This way, you'll have all your
covers in their original size, plus a thumbnail suitable for
emms-browser.
If you, like resolve and I, experience weird scrolling with images in a
buffer, try:
(setq scroll-down-aggressively 0.0
scroll-up-aggressively 0.0)
It should fix it.
Happy hacking,
--
Lucas
_______________________________________________
Emms-help mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emms-help
