
(defun vm-clear-all-marks nil "\
Removes all message marks in the current folder." (interactive) (byte-code "Âˆ… Å!… qˆÆ	!… Å	!?… Â‰ˆÇ ˆ…> @ÈHÈÂIˆÉ@!ˆA‰ˆ‚% )ˆÊ ‡" [vm-mail-buffer vm-summary-buffer nil mp vm-message-list buffer-name bufferp vm-error-if-folder-empty 1 vm-mark-for-display-update vm-update-summary-and-mode-line] 8))

(defun vm-mark-all-messages nil "\
Mark all messages in the current folder." (interactive) (byte-code "Âˆ… Æ!… qˆÇ	!… Æ	!?… Â‰ˆÈ ˆ…> @ÉHÉÅIˆÊ@!ˆA‰ˆ‚% )ˆË ‡" [vm-mail-buffer vm-summary-buffer nil mp vm-message-list t buffer-name bufferp vm-error-if-folder-empty 1 vm-mark-for-display-update vm-update-summary-and-mode-line] 8))

(defun vm-mark-message (count) "\
Mark the current message.
Numeric prefix argument N means mark the current message and the next
N-1 messages.  A negative N means mark the current message and the
previous N-1 messages." (interactive "p") (byte-code "Âˆt… É ˆ… Ê!… qˆË	!…& Ê	!?…& Â‰ˆÌ ˆÄ=?…4 Í!ˆÎWƒ? Ï‚@ ÐÑ!Ò!?…ƒ @ÓHÓH?…n @ÓHÓÄIˆÔ@!ˆS‰ˆÒ!?… Õ!ˆ‚N ,ˆÖ ‡" [vm-mail-buffer vm-summary-buffer nil vm-circular-folders t count direction oldmp vm-message-pointer vm-follow-summary-cursor buffer-name bufferp vm-error-if-folder-empty vm-check-count 0 backward forward vm-abs zerop 1 vm-mark-for-display-update vm-move-message-pointer vm-update-summary-and-mode-line] 13))

(defun vm-unmark-message (count) "\
Remove the mark from the current message.
Numeric prefix argument N means unmark the current message and the next
N-1 messages.  A negative N means unmark the current message and the
previous N-1 messages." (interactive "p") (byte-code "Âˆt… É ˆ… Ê!… qˆË	!…& Ê	!?…& Â‰ˆÌ ˆÄ=?…4 Í!ˆÎWƒ? Ï‚@ ÐÑ!Ò!?…‚ @ÓHÓH…m @ÓHÓÂIˆÔ@!ˆS‰ˆÒ!?…~ Õ!ˆ‚N ,ˆÖ ‡" [vm-mail-buffer vm-summary-buffer nil vm-circular-folders t count direction oldmp vm-message-pointer vm-follow-summary-cursor buffer-name bufferp vm-error-if-folder-empty vm-check-count 0 backward forward vm-abs zerop 1 vm-mark-for-display-update vm-move-message-pointer vm-update-summary-and-mode-line] 13))

(defun vm-next-command-uses-marks nil "\
Does nothing except insure that the next VM command will operate only
on the marked messages in the current folder." (interactive) (byte-code "ÁˆÂÃ!ˆr‰‡" [unread-command-char nil message "Next command uses marks..."] 3))

(defun vm-marked-messages nil (byte-code "Ã
	…  	@ÄHÄH… 	@B‰ˆ	A‰ˆ‚ ˆÅ!*‡" [list mp vm-message-list nil 1 nreverse] 3))

(defun vm-mark-help nil (interactive) (byte-code "ÀˆÁÂ!‡" [nil message "MM = mark, MU = unmark, Mm = mark all, Mu = unmark all, MN - use marks"] 2))
