Function: mh-refile-or-write-again

mh-refile-or-write-again is an autoloaded, interactive and byte-compiled function defined in mh-folder.el.gz.

Signature

(mh-refile-or-write-again RANGE &optional INTERACTIVE-FLAG)

Documentation

Repeat last output command.

If you are refiling several messages into the same folder, you can use this command to repeat the last refile (M-x mh-refile-msg (mh-refile-msg)) or write (M-x mh-write-msg-to-file (mh-write-msg-to-file)). You can use a range.

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

In a program, a non-nil INTERACTIVE-FLAG means that the function was called interactively.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/mh-e/mh-folder.el.gz
;;;###mh-autoload
(defun mh-refile-or-write-again (range &optional interactive-flag)
  "Repeat last output command.

If you are refiling several messages into the same folder, you
can use this command to repeat the last
refile (\\[mh-refile-msg]) or write (\\[mh-write-msg-to-file]).
You can use a range.

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

In a program, a non-nil INTERACTIVE-FLAG means that the function was
called interactively."
  (interactive (list (mh-interactive-range "Redo") t))
  (if (null mh-last-destination)
      (error "No previous refile or write"))
  (cond ((eq (car mh-last-destination) 'refile)
         (mh-refile-msg range (cdr mh-last-destination))
         (message "Destination folder: %s" (cdr mh-last-destination)))
        (t
         (mh-iterate-on-range msg range
           (apply #'mh-write-msg-to-file msg (cdr mh-last-destination)))
         (mh-next-msg interactive-flag))))