Mercurial > hg > xemacs-beta

diff lisp/vm/vm-mark.el @ 26:441bb1e64a06 r19-15b96

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b96
author cvs
date Mon, 13 Aug 2007 08:51:32 +0200
parents 859a2309aef8
children 05472e90ae02
line wrap: on
line diff
--- a/lisp/vm/vm-mark.el	Mon Aug 13 08:51:05 2007 +0200
+++ b/lisp/vm/vm-mark.el	Mon Aug 13 08:51:32 2007 +0200
@@ -343,10 +343,12 @@
 
 (defun vm-next-command-uses-marks ()
   "Does nothing except insure that the next VM command will operate only
-on the marked messages in the current folder."
+on the marked messages in the current folder.  This only works for
+commands bound to key, menu or button press events.  M-x vm-command will
+not work."
   (interactive)
   (setq this-command 'vm-next-command-uses-marks)
-  (vm-unsaved-message "Next command uses marks...")
+  (message "Next command uses marks...")
   (vm-display nil nil '(vm-next-command-uses-marks)
 	      '(vm-next-command-uses-marks)))