Mercurial > emacs

changeset 70807:ce0e66acbc05

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Added information to the add-tags prompt.
author Mathias Dahl <mathias.dahl@gmail.com>
date Sun, 21 May 2006 14:03:56 +0000
parents 1727784ff9ff
children 0c087a8f2e1c
files lisp/tumme.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/tumme.el	Sun May 21 08:33:46 2006 +0000
+++ b/lisp/tumme.el	Sun May 21 14:03:56 2006 +0000
@@ -976,7 +976,7 @@
 (defun tumme-tag-files (arg)
   "Tag marked file(s) in dired.  With prefix ARG, tag file at point."
   (interactive "P")
-  (let ((tag (read-string "Tag to add: "))
+  (let ((tag (read-string "Tags to add (separate tags with a semicolon): "))
         curr-file files)
     (if arg
         (setq files (dired-get-filename))
@@ -986,7 +986,7 @@
 (defun tumme-tag-thumbnail ()
   "Tag current thumbnail."
   (interactive)
-  (let ((tag (read-string "Tag to add: ")))
+  (let ((tag (read-string "Tags to add (separate tags with a semicolon): ")))
     (tumme-write-tag (tumme-original-file-name) tag))
   (tumme-update-property
    'tags (tumme-list-tags (tumme-original-file-name))))