* lisp/loadup.el: Count byte-code functions as well.

[gnu-emacs] / lisp / mh-e / mh-junk.el

diff --git a/lisp/mh-e/mh-junk.el b/lisp/mh-e/mh-junk.el
index 8b62160b9668c0e4b43770fc23c93a506a3badb1..2119d6f93ea3aecd14d157c3ecea40ca8b7ff258 100644 (file)
--- a/lisp/mh-e/mh-junk.el
+++ b/lisp/mh-e/mh-junk.el
@@ -1,7 +1,6 @@
 ;;; mh-junk.el --- MH-E interface to anti-spam measures
 
-;; Copyright (C) 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011
-;;   Free Software Foundation, Inc.
+;; Copyright (C) 2003-2012  Free Software Foundation, Inc.
 
 ;; Author: Satyaki Das <satyaki@theforce.stanford.edu>,
 ;;         Bill Wohler <wohler@newt.com>
@@ -313,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)
-    (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))