aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/tumme.el9
1 files changed, 9 insertions, 0 deletions
diff --git a/lisp/tumme.el b/lisp/tumme.el
index a75f5627eb9..005258790c2 100644
--- a/lisp/tumme.el
+++ b/lisp/tumme.el
@@ -1208,6 +1208,7 @@ displayed."
1208 (kill-buffer buf) 1208 (kill-buffer buf)
1209 (split-string tags ";")))) 1209 (split-string tags ";"))))
1210 1210
1211;;;###autoload
1211(defun tumme-tag-files (arg) 1212(defun tumme-tag-files (arg)
1212 "Tag marked file(s) in dired. With prefix ARG, tag file at point." 1213 "Tag marked file(s) in dired. With prefix ARG, tag file at point."
1213 (interactive "P") 1214 (interactive "P")
@@ -1226,6 +1227,7 @@ displayed."
1226 (tumme-update-property 1227 (tumme-update-property
1227 'tags (tumme-list-tags (tumme-original-file-name)))) 1228 'tags (tumme-list-tags (tumme-original-file-name))))
1228 1229
1230;;;###autoload
1229(defun tumme-tag-remove (arg) 1231(defun tumme-tag-remove (arg)
1230 "Remove tag for selected file(s). 1232 "Remove tag for selected file(s).
1231With prefix argument ARG, remove tag from file at point." 1233With prefix argument ARG, remove tag from file at point."
@@ -1489,6 +1491,7 @@ You probably want to use this together with
1489 (select-window window)) 1491 (select-window window))
1490 (message "Associated dired buffer not visible")))) 1492 (message "Associated dired buffer not visible"))))
1491 1493
1494;;;###autoload
1492(defun tumme-jump-thumbnail-buffer () 1495(defun tumme-jump-thumbnail-buffer ()
1493 "Jump to thumbnail buffer." 1496 "Jump to thumbnail buffer."
1494 (interactive) 1497 (interactive)
@@ -1887,11 +1890,13 @@ Ask user for number of images to show and the delay in between."
1887 (if (looking-at " ") 1890 (if (looking-at " ")
1888 (delete-char 1)))) 1891 (delete-char 1))))
1889 1892
1893;;;###autoload
1890(defun tumme-display-thumbs-append () 1894(defun tumme-display-thumbs-append ()
1891 "Append thumbnails to `tumme-thumbnail-buffer'." 1895 "Append thumbnails to `tumme-thumbnail-buffer'."
1892 (interactive) 1896 (interactive)
1893 (tumme-display-thumbs nil t)) 1897 (tumme-display-thumbs nil t))
1894 1898
1899;;;###autoload
1895(defun tumme-display-thumb () 1900(defun tumme-display-thumb ()
1896 "Shorthard for `tumme-display-thumbs' with prefix argument." 1901 "Shorthard for `tumme-display-thumbs' with prefix argument."
1897 (interactive) 1902 (interactive)
@@ -1962,6 +1967,7 @@ Ask user how many thumbnails should be displayed per row."
1962 tumme-external-viewer 1967 tumme-external-viewer
1963 file)))))) 1968 file))))))
1964 1969
1970;;;###autoload
1965(defun tumme-dired-display-external () 1971(defun tumme-dired-display-external ()
1966 "Display file at point using an external viewer." 1972 "Display file at point using an external viewer."
1967 (interactive) 1973 (interactive)
@@ -2070,6 +2076,7 @@ With prefix argument ARG, display image in its original size."
2070 (tumme-display-image file arg) 2076 (tumme-display-image file arg)
2071 (display-buffer tumme-display-image-buffer)))))) 2077 (display-buffer tumme-display-image-buffer))))))
2072 2078
2079;;;###autoload
2073(defun tumme-display-dired-image (&optional arg) 2080(defun tumme-display-dired-image (&optional arg)
2074 "Display current image file. 2081 "Display current image file.
2075See documentation for `tumme-display-image' for more information. 2082See documentation for `tumme-display-image' for more information.
@@ -2320,6 +2327,7 @@ browse and tag them using rest of the functionality in `tumme'."
2320 prop 2327 prop
2321 value))) 2328 value)))
2322 2329
2330;;;###autoload
2323(defun tumme-dired-comment-files () 2331(defun tumme-dired-comment-files ()
2324 "Add comment to current or marked files in dired." 2332 "Add comment to current or marked files in dired."
2325 (interactive) 2333 (interactive)
@@ -2370,6 +2378,7 @@ browse and tag them using rest of the functionality in `tumme'."
2370 (kill-buffer buf) 2378 (kill-buffer buf)
2371 comment))) 2379 comment)))
2372 2380
2381;;;###autoload
2373(defun tumme-mark-tagged-files () 2382(defun tumme-mark-tagged-files ()
2374 "Use regexp to mark files with matching tag." 2383 "Use regexp to mark files with matching tag."
2375 (interactive) 2384 (interactive)