# HG changeset patch
# User Juri Linkov <juri@jurta.org>
# Date 1139841958 0
# Node ID ef6240377b78537dc902597d320ed175af00f17d
# Parent  c8b4cb06e1b335b17a3a549b5d0baa1f4e955bf2
(tumme-thumbnail-storage): Fix docstring.
(tumme-thumb-name): Fix per-directory format.

diff -r c8b4cb06e1b3 -r ef6240377b78 lisp/tumme.el
--- a/lisp/tumme.el	Mon Feb 13 11:34:20 2006 +0000
+++ b/lisp/tumme.el	Mon Feb 13 14:45:58 2006 +0000
@@ -213,8 +213,8 @@
 means that each thumbnail is stored in a subdirectory called
 \".tumme\" in the same directory where the image file is.
 \"Thumbnail Managing Standard\" means that the thumbnails are
-stored and generated according to the Thumbnail Managing
-Standard."
+stored and generated according to the Thumbnail Managing Standard
+that allows sharing of thumbnails across different programs."
   :type '(choice :tag "How to store thumbnail files"
                  (const :tag "Thumbnail Managing Standard" standard)
                  (const :tag "Use tumme-dir" use-tumme-dir)
@@ -629,8 +629,8 @@
                    (file-name-extension f))))
         ((eq 'per-directory tumme-thumbnail-storage)
          (let ((f (expand-file-name file)))
-           (format "%s%s%s.thumb.%s"
-                   (format "%s.tumme/" (file-name-directory f))
+           (format "%s.tumme/%s.thumb.%s"
+                   (file-name-directory f)
                    (file-name-sans-extension (file-name-nondirectory f))
                    (file-name-extension f))))))