aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman1998-10-10 14:06:14 +0000
committerRichard M. Stallman1998-10-10 14:06:14 +0000
commit7163b71c975286b0c98ffb9b5fd7e5709cde7990 (patch)
treea0c537715bebced265b7c151f7aebca30d6f0a39
parent49cd149a22d82e22f0f293babc64b3e356410e02 (diff)
downloademacs-7163b71c975286b0c98ffb9b5fd7e5709cde7990.tar.gz
emacs-7163b71c975286b0c98ffb9b5fd7e5709cde7990.zip
(feedmail-queue-runner-is-active): Definition moved.
-rw-r--r--lisp/mail/feedmail.el18
1 files changed, 9 insertions, 9 deletions
diff --git a/lisp/mail/feedmail.el b/lisp/mail/feedmail.el
index 27ba0ab4152..e2c1e7e0480 100644
--- a/lisp/mail/feedmail.el
+++ b/lisp/mail/feedmail.el
@@ -1117,6 +1117,15 @@ the file without bothering you."
1117(defvar feedmail-address-list nil) 1117(defvar feedmail-address-list nil)
1118 1118
1119 1119
1120(defvar feedmail-queue-runner-is-active nil
1121 "*Non-nil means we're inside the logic of the queue-running loop.
1122That is, iterating over all messages in the queue to send them. In
1123that case, the value is the name of the queued message file currently
1124being processed. This can be used for differentiating customized code
1125for different scenarios. Users shouldn't set or change this
1126variable, but may depend on its value as described here.")
1127
1128
1120(defun feedmail-mail-send-hook-splitter () 1129(defun feedmail-mail-send-hook-splitter ()
1121 "Facilitate dividing mail-send-hook things into queued and immediate cases. 1130 "Facilitate dividing mail-send-hook things into queued and immediate cases.
1122If you have mail-send-hook functions that should only be called for sending/ 1131If you have mail-send-hook functions that should only be called for sending/
@@ -1262,15 +1271,6 @@ function, for example, to archive all of your sent messages someplace
1262 ) 1271 )
1263 1272
1264 1273
1265(defvar feedmail-queue-runner-is-active nil
1266 "*Non-nil means we're inside the logic of the queue-running loop.
1267That is, iterating over all messages in the queue to send them. In
1268that case, the value is the name of the queued message file currently
1269being processed. This can be used for differentiating customized code
1270for different scenarios. Users shouldn't set or change this
1271variable, but may depend on its value as described here.")
1272
1273
1274(defvar feedmail-is-a-resend nil 1274(defvar feedmail-is-a-resend nil
1275 "*Non-nil means the the message is a Resend (in the RFC-822 sense). 1275 "*Non-nil means the the message is a Resend (in the RFC-822 sense).
1276This affects the composition of certain headers. feedmail sets this 1276This affects the composition of certain headers. feedmail sets this