Variable: feedmail-queue-runner-cleaner-upper

feedmail-queue-runner-cleaner-upper is a customizable variable defined in feedmail.el.gz.

Value

#[513 "\300!\210\211\205\f�\301\302\"\207"
      [delete-file feedmail-say-chatter "Nuked %s"] 5
      ("/nix/store/y8rifw71hjgsl2qjn1l0vrwq2c3593aw-emacs-30-2/share/emacs/30.2/lisp/mail/feedmail.elc"
       . 49401)]

Documentation

Function that will be called after a message has been sent.

Not called in the case of errors. This function is called with two arguments: the name of the message queue file for the message just sent, and the optional argument used in the call to feedmail-run-the-queue or feedmail-run-the-queue-no-prompts (prefix arg if interactive). In any case, the affiliated buffer is killed elsewhere, so don't do that inside this function. Return value is ignored.

The default action is an anonymous function which gets rid of the file from the queue directory. With a non-nil second argument, a brief message is give for each file deleted. You could replace this function, for example, to archive all of your sent messages someplace
(though there are better ways to get that particular result).

Source Code

;; Defined in /usr/src/emacs/lisp/mail/feedmail.el.gz
(defcustom feedmail-queue-runner-cleaner-upper
  (lambda (fqm-file &optional arg)
     (delete-file fqm-file)
     (if arg (feedmail-say-chatter "Nuked %s" fqm-file)))
  "Function that will be called after a message has been sent.
Not called in the case of errors.  This function is called with two
arguments: the name of the message queue file for the message just sent,
and the optional argument used in the call to `feedmail-run-the-queue'
or `feedmail-run-the-queue-no-prompts' (prefix arg if interactive).
In any case, the affiliated buffer is killed elsewhere, so don't do that
inside this function.  Return value is ignored.

The default action is an anonymous function which gets rid of the file
from the queue directory.  With a non-nil second argument, a brief
message is give for each file deleted.  You could replace this
function, for example, to archive all of your sent messages someplace
\(though there are better ways to get that particular result)."
  :group 'feedmail-queue
  :type 'function
  )