# HG changeset patch # User Richard M. Stallman # Date 908028374 0 # Node ID b9c1f9b1dac9bce902680ebcb8de22ab28a48804 # Parent 063b2599a0fd22a203004127f165703f65d69186 (feedmail-queue-runner-is-active): Definition moved. diff -r 063b2599a0fd -r b9c1f9b1dac9 lisp/mail/feedmail.el --- a/lisp/mail/feedmail.el Sat Oct 10 12:10:30 1998 +0000 +++ b/lisp/mail/feedmail.el Sat Oct 10 14:06:14 1998 +0000 @@ -1117,6 +1117,15 @@ (defvar feedmail-address-list nil) +(defvar feedmail-queue-runner-is-active nil + "*Non-nil means we're inside the logic of the queue-running loop. +That is, iterating over all messages in the queue to send them. In +that case, the value is the name of the queued message file currently +being processed. This can be used for differentiating customized code +for different scenarios. Users shouldn't set or change this +variable, but may depend on its value as described here.") + + (defun feedmail-mail-send-hook-splitter () "Facilitate dividing mail-send-hook things into queued and immediate cases. If you have mail-send-hook functions that should only be called for sending/ @@ -1262,15 +1271,6 @@ ) -(defvar feedmail-queue-runner-is-active nil - "*Non-nil means we're inside the logic of the queue-running loop. -That is, iterating over all messages in the queue to send them. In -that case, the value is the name of the queued message file currently -being processed. This can be used for differentiating customized code -for different scenarios. Users shouldn't set or change this -variable, but may depend on its value as described here.") - - (defvar feedmail-is-a-resend nil "*Non-nil means the the message is a Resend (in the RFC-822 sense). This affects the composition of certain headers. feedmail sets this