|
| From: | Stefan Monnier |
| Subject: | Re: A few issues with thumbs.el |
| Date: | Thu, 26 May 2005 10:02:51 -0400 |
| User-agent: | Gnus/5.11 (Gnus v5.11) Emacs/22.0.50 (gnu/linux) |
> (defun thumbs-thumbname (img)
> "Return a thumbnail name for the image IMG."
> (convert-standard-filename
> (concat thumbs-thumbsdir "/"
> (subst-char-in-string
> ?\s ?\_
> (apply
> 'concat
> (split-string
> (expand-file-name img) "/"))))))
Why not just
(defun thumbs-thumbname (img)
"Return a thumbnail name for the image IMG."
(concat thumbs-thumbsdir "/"
(convert-standard-filename
(subst-char-in-string ?/ ?\| (expand-file-name img)))))
-- Stefan
| [Prev in Thread] | Current Thread | [Next in Thread] |