[Emacs-diffs] Changes to emacs/lisp/tumme.el

[Mathias Dahl]

Index: emacs/lisp/tumme.el
diff -u emacs/lisp/tumme.el:1.9 emacs/lisp/tumme.el:1.10
--- emacs/lisp/tumme.el:1.9     Thu Feb  9 22:43:39 2006
+++ emacs/lisp/tumme.el Thu Feb  9 23:08:19 2006
@@ -847,7 +847,7 @@
 
 (defcustom tumme-show-all-from-dir-max-files 50
   "*Maximum number of files to show using`tumme-show-all-from-dir'.
- before warning the user."
+before warning the user."
   :type 'integer
   :group 'tumme)
 
@@ -1025,8 +1025,8 @@
  - Set `truncate-lines' to t
 
 After the command has finished, you would typically mark some
-image files in dired and call `tumme-display-thumbs' (by default
-bound to C-t d).
+image files in dired and type
+\\[tumme-display-thumbs] (`tumme-display-thumbs').
 
 If called with prefix argument ARG, skip splitting of windows.
 
@@ -1119,7 +1119,7 @@
             (and (> (length files) tumme-show-all-from-dir-max-files)
                  (y-or-n-p
                   (format
-                   "Directory contains more than %d image files. Proceed? "
+                   "Directory contains more than %d image files.  Proceed? "
                    tumme-show-all-from-dir-max-files))))
         (progn
           (tumme-display-thumbs)
@@ -1832,7 +1832,7 @@
 (defun tumme-create-thumbs (&optional arg)
   "Create thumbnail images for all marked files in dired.
 With prefix argument ARG, create thumbnails even if they already exist
-\(i.e. use this to refresh your thumbnails)."
+\(i.e.  use this to refresh your thumbnails)."
   (interactive "P")
   (let (curr-file thumb-name files count)
     (setq files (dired-get-marked-files))
@@ -2248,21 +2248,17 @@
 
 (defun tumme-copy-with-exif-file-name ()
   "Copy file with unique name to main image directory.
-Copy current or all marked files in dired to a new file in your main
-image directory, using a file name generated by
-`tumme-get-exif-file-name'.  This might or might not be useful for
-other people, but I use it each time I fetch images from my digital
-camera, for copying the images into my main image directory.
-
-Typically I open up the folder where I store my incoming digital
-images, with file names like dscn0319.jpg, dscn0320.jpg etc., mark the
-files I want to copy into my main image directory, and execute this
-function.  The result is a couple of new files in
-`tumme-main-image-directory' called 2005_05_08_12_52_00_dscn0319.jpg,
-2005_05_08_14_27_45_dscn0320.jpg etc.
+Copy current or all marked files in dired to a new file in your
+main image directory, using a file name generated by
+`tumme-get-exif-file-name'.  A typical usage for this if when
+copying images from a digital camera into the image directory.
 
-When the images are safely in my main image directory I start to
-browse and tag them using rest of the functionality in `tumme'."
+ Typically, you would open up the folder with the incoming
+digital images, mark the files to be copied, and execute this
+function.  The result is a couple of new files in
+`tumme-main-image-directory' called
+2005_05_08_12_52_00_dscn0319.jpg,
+2005_05_08_14_27_45_dscn0320.jpg etc."
   (interactive)
   (let (new-name
         (files (dired-get-marked-files)))
@@ -2605,7 +2601,7 @@
     ;; Make sure gallery root exist
     (if (file-exists-p tumme-gallery-dir)
         (if (not (file-directory-p tumme-gallery-dir))
-            (error "tumme-gallery-dir is not a directory"))
+            (error "Variable tumme-gallery-dir is not a directory"))
       (make-directory tumme-gallery-dir))
     ;; Open index file
     (setq index-buf (find-file