(spam-report-plug-agent): Quote spam-report-url-to-file and

 spam-report-url-ping-plain.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 3d85e5b..33450e4 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2004-02-25  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+       * spam-report.el (spam-report-plug-agent): Quote
+       spam-report-url-to-file and spam-report-url-ping-plain.
+
 2004-02-25  Reiner Steib  <Reiner.Steib@gmx.de>
 
        * gnus-art.el (gnus-button-alist, gnus-header-button-alist): Allow

diff --git a/lisp/spam-report.el b/lisp/spam-report.el
index 0f2d2be..6527817 100644 (file)
--- a/lisp/spam-report.el
+++ b/lisp/spam-report.el
@@ -221,13 +221,13 @@ Process queued spam reports."
   ;; Process the queue, unless the user only wanted to report to a file
   ;; anyway.
   (unless (equal spam-report-url-ping-temp-agent-function
-                spam-report-url-to-file)
+                'spam-report-url-to-file)
     (spam-report-process-queue))
   ;; Set the reporting function, if we have memorized something otherwise,
   ;; stick with plain URL reporting.
   (setq spam-report-url-ping-function
        (or spam-report-url-ping-temp-agent-function
-           spam-report-url-ping-plain)))
+           'spam-report-url-ping-plain)))
 
 (defun spam-report-unplug-agent ()
   "Restore spam report settings for unplugged state."