aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorMathias Dahl <[email protected]>2006-02-09 23:08:19 +0000
committerMathias Dahl <[email protected]>2006-02-09 23:08:19 +0000
commit49f18bccba0bc666c50057831862d224639deeb2 (patch)
tree737fa4f08263774d6f009330d1bafd455f556c98 /lisp
parent13664bec59d325535eb280ed3fe2b8a69d5b6876 (diff)
Tried to make docstring less `colloquial'...
Diffstat (limited to 'lisp')
-rw-r--r--lisp/tumme.el36
1 files changed, 16 insertions, 20 deletions
diff --git a/lisp/tumme.el b/lisp/tumme.el
index 2fd4a09777..0436a0cb55 100644
--- a/lisp/tumme.el
+++ b/lisp/tumme.el
@@ -847,7 +847,7 @@ Used by `tumme-copy-with-exif-file-name'."
(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 @@ Convenience command that:
- 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 @@ displayed."
(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 @@ Note that n, p and <down> and <up> will be hijacked and bound to
(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 @@ default value at the prompt."
(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 @@ when using per-directory thumbnail file storage"))
;; 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