Index: emacs/lisp/gnus/spam-report.el
diff -c emacs/lisp/gnus/spam-report.el:1.6 emacs/lisp/gnus/spam-report.el:1.7
*** emacs/lisp/gnus/spam-report.el:1.6  Thu May 26 15:03:29 2005
--- emacs/lisp/gnus/spam-report.el      Mon May 30 17:13:57 2005
***************
*** 183,196 ****
  the external program specified in `mm-url-program' to connect to
  server."
    (with-temp-buffer
!     (let ((url (concat "http://"; host report)))
        (mm-url-insert url t))))
  
  ;;;###autoload
  (defun spam-report-url-to-file (host report)
    "Collect spam report requests in `spam-report-requests-file'.
  Customize `spam-report-url-ping-function' to use this function."
!   (let ((url (concat "http://"; host report))
        (file spam-report-requests-file))
      (gnus-make-directory (file-name-directory file))
      (gnus-message 9 "Writing URL `%s' to file `%s'" url file)
--- 183,196 ----
  the external program specified in `mm-url-program' to connect to
  server."
    (with-temp-buffer
!     (let ((url (format "http://%s%s"; host report)))
        (mm-url-insert url t))))
  
  ;;;###autoload
  (defun spam-report-url-to-file (host report)
    "Collect spam report requests in `spam-report-requests-file'.
  Customize `spam-report-url-ping-function' to use this function."
!   (let ((url (format "http://%s%s"; host report))
        (file spam-report-requests-file))
      (gnus-make-directory (file-name-directory file))
      (gnus-message 9 "Writing URL `%s' to file `%s'" url file)


_______________________________________________
Emacs-diffs mailing list
Emacs-diffs@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-diffs

Reply via email to