Mercurial > hg > xemacs-beta

comparison lisp/vm/vm-save.el @ 136:b980b6286996 r20-2b2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-2b2
author cvs
date Mon, 13 Aug 2007 09:31:12 +0200
parents cca96a509cfe
children 489f57a838ef
comparison
equal deleted inserted replaced
135:4636a6841cd6 136:b980b6286996
432 (buffer-name file-buffer)) 432 (buffer-name file-buffer))
433 (message "Message%s written to %s" (if (/= 1 count) "s" "") file))) 433 (message "Message%s written to %s" (if (/= 1 count) "s" "") file)))
434 (setq vm-last-written-file file))) 434 (setq vm-last-written-file file)))
435 435
436 (defun vm-pipe-message-to-command (command prefix-arg) 436 (defun vm-pipe-message-to-command (command prefix-arg)
437 "Run shell command with the some or all of the current message as input. 437 "Runs a shell command with some or all of the contents of the
438 By default the entire message is used. 438 current message as input.
439 By default, the entire message is used.
439 With one \\[universal-argument] the text portion of the message is used. 440 With one \\[universal-argument] the text portion of the message is used.
440 With two \\[universal-argument]'s the header portion of the message is used. 441 With two \\[universal-argument]'s the header portion of the message is used.
441 With three \\[universal-argument]'s the visible header portion of the message 442 With three \\[universal-argument]'s the visible header portion of the message
442 plus the text portion is used. 443 plus the text portion is used.
443 444