Function: mh-delete-msg

mh-delete-msg is an autoloaded, interactive and byte-compiled function defined in mh-folder.el.gz.

Signature

(mh-delete-msg RANGE)

Documentation

Delete RANGE.

To mark a message for deletion, use this command. A "D" is placed by the message in the scan window, and the next undeleted message is displayed. If the previous command had been p (mh-previous-undeleted-msg), then the next message displayed is the first undeleted message previous to the message just deleted. Use n (mh-next-undeleted-msg) to force subsequent d (mh-delete-msg) commands to move forward to the next undeleted message after deleting the message under the cursor.

The hook mh-delete-msg-hook is called after you mark a message for deletion. For example, a past maintainer of MH-E used this once when he kept statistics on his mail usage.

Check the documentation of mh-interactive-range to see how RANGE is read in interactive use.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/mh-e/mh-folder.el.gz
;;; MH-Folder Commands

;; Alphabetical.
;; See also mh-comp.el, mh-junk.el, mh-mime.el, mh-print.el,
;; mh-search.el, and mh-seq.el.

;;;###mh-autoload
(defun mh-delete-msg (range)
  "Delete RANGE\\<mh-folder-mode-map>.

To mark a message for deletion, use this command. A \"D\" is
placed by the message in the scan window, and the next undeleted
message is displayed. If the previous command had been
\\[mh-previous-undeleted-msg], then the next message displayed is
the first undeleted message previous to the message just deleted.
Use \\[mh-next-undeleted-msg] to force subsequent
\\[mh-delete-msg] commands to move forward to the next undeleted
message after deleting the message under the cursor.

The hook `mh-delete-msg-hook' is called after you mark a message
for deletion. For example, a past maintainer of MH-E used this
once when he kept statistics on his mail usage.

Check the documentation of `mh-interactive-range' to see how
RANGE is read in interactive use."
  (interactive (list (mh-interactive-range "Delete")))
  (mh-delete-msg-no-motion range)
  (if (looking-at mh-scan-deleted-msg-regexp)
      (mh-next-msg)))