]> code.delx.au - gnu-emacs/blobdiff - lisp/mh-e/mh-junk.el
* lisp/loadup.el: Count byte-code functions as well.
[gnu-emacs] / lisp / mh-e / mh-junk.el
index e3ca8ad24e72859596b433f18808ec6a5ea843f2..2119d6f93ea3aecd14d157c3ecea40ca8b7ff258 100644 (file)
@@ -1,6 +1,6 @@
 ;;; mh-junk.el --- MH-E interface to anti-spam measures
 
 ;;; mh-junk.el --- MH-E interface to anti-spam measures
 
-;; Copyright (C) 2003, 2004, 2005, 2006, 2007, 2008 Free Software Foundation, Inc.
+;; Copyright (C) 2003-2012  Free Software Foundation, Inc.
 
 ;; Author: Satyaki Das <satyaki@theforce.stanford.edu>,
 ;;         Bill Wohler <wohler@newt.com>
 
 ;; Author: Satyaki Das <satyaki@theforce.stanford.edu>,
 ;;         Bill Wohler <wohler@newt.com>
@@ -107,8 +107,8 @@ RANGE is read in interactive use."
   "Blacklist MSG with SpamAssassin.
 
 SpamAssassin is one of the more popular spam filtering programs.
   "Blacklist MSG with SpamAssassin.
 
 SpamAssassin is one of the more popular spam filtering programs.
-Get it from your local distribution or from
-http://spamassassin.org/.
+Get it from your local distribution or from the SpamAssassin web
+site at URL `http://spamassassin.org/'.
 
 To use SpamAssassin, add the following recipes to
 \".procmailrc\":
 
 To use SpamAssassin, add the following recipes to
 \".procmailrc\":
@@ -312,9 +312,9 @@ information can be used so that you can replace multiple
     (delete-other-windows)
     (pop-to-buffer (get-buffer-create "*MH-E Spammer Frequencies*"))
     (erase-buffer)
     (delete-other-windows)
     (pop-to-buffer (get-buffer-create "*MH-E Spammer Frequencies*"))
     (erase-buffer)
-    (maphash '(lambda (key value) ""
-                (if (> value 2)
-                    (insert (format "%s %s\n" key value))))
+    (maphash (lambda (key value) ""
+               (if (> value 2)
+                   (insert (format "%s %s\n" key value))))
              domains)
     (sort-numeric-fields 2 (point-min) (point-max))
     (reverse-region (point-min) (point-max))
              domains)
     (sort-numeric-fields 2 (point-min) (point-max))
     (reverse-region (point-min) (point-max))
@@ -331,7 +331,8 @@ information can be used so that you can replace multiple
   "Blacklist MSG with bogofilter.
 
 Bogofilter is a Bayesian spam filtering program. Get it from your
   "Blacklist MSG with bogofilter.
 
 Bogofilter is a Bayesian spam filtering program. Get it from your
-local distribution or from http://bogofilter.sourceforge.net/.
+local distribution or from the bogofilter web site at URL
+`http://bogofilter.sourceforge.net/'.
 
 Bogofilter is taught by running:
 
 
 Bogofilter is taught by running:
 
@@ -410,8 +411,9 @@ See `mh-bogofilter-blacklist' for more information."
 (defun mh-spamprobe-blacklist (msg)
   "Blacklist MSG with SpamProbe.
 
 (defun mh-spamprobe-blacklist (msg)
   "Blacklist MSG with SpamProbe.
 
-SpamProbe is a Bayesian spam filtering program. Get it from your local
-distribution or from http://spamprobe.sourceforge.net.
+SpamProbe is a Bayesian spam filtering program. Get it from your
+local distribution or from the SpamProbe web site at URL
+`http://spamprobe.sourceforge.net'.
 
 To use SpamProbe, add the following recipes to \".procmailrc\":
 
 
 To use SpamProbe, add the following recipes to \".procmailrc\":
 
@@ -464,5 +466,4 @@ See `mh-spamprobe-blacklist' for more information."
 ;; sentence-end-double-space: nil
 ;; End:
 
 ;; sentence-end-double-space: nil
 ;; End:
 
-;; arch-tag: 603335f1-77ff-4306-8828-5d3dad51abe1
 ;;; mh-junk.el ends here
 ;;; mh-junk.el ends here