Function: mh-next-undeleted-msg

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

Signature

(mh-next-undeleted-msg &optional COUNT WAIT-AFTER-COMPLAINING-FLAG)

Documentation

Display next message.

This command can be given a prefix argument COUNT to specify how many unread messages to skip.

In a program, pause for a second after printing message if we are at the last undeleted message and optional argument WAIT-AFTER-COMPLAINING-FLAG is non-nil.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/mh-e/mh-folder.el.gz
;;;###mh-autoload
(defun mh-next-undeleted-msg (&optional count wait-after-complaining-flag)
  "Display next message.

This command can be given a prefix argument COUNT to specify how
many unread messages to skip.

In a program, pause for a second after printing message if we are
at the last undeleted message and optional argument
WAIT-AFTER-COMPLAINING-FLAG is non-nil."
  (interactive "p")
  (setq mh-next-direction 'forward)
  (forward-line 1)
  (cond ((re-search-forward mh-scan-good-msg-regexp nil t count)
         (beginning-of-line)
         (mh-maybe-show))
        (t (forward-line -1)
           (message "No more undeleted messages")
           (if wait-after-complaining-flag (sit-for 1)))))