Mercurial > emacs
diff lisp/mh-e/mh-junk.el @ 62847:aa8c2e12ee24
Upgraded to MH-E version 7.84.
See etc/MH-E-NEWS and lisp/mh-e/ChangeLog for details.
| author | Bill Wohler <wohler@newt.com> |
|---|---|
| date | Sat, 28 May 2005 22:04:54 +0000 |
| parents | 4f4f410e6fe8 |
| children | 18a818a2ee7c 01137c1fdbe9 |
line wrap: on
line diff
--- a/lisp/mh-e/mh-junk.el Sat May 28 16:57:21 2005 +0000 +++ b/lisp/mh-e/mh-junk.el Sat May 28 22:04:54 2005 +0000 @@ -1,6 +1,6 @@ ;;; mh-junk.el --- Interface to anti-spam measures -;; Copyright (C) 2005 Free Software Foundation, Inc. +;; Copyright (C) 2003, 2004 Free Software Foundation, Inc. ;; Author: Satyaki Das <satyaki@theforce.stanford.edu>, ;; Bill Wohler <wohler@newt.com> @@ -191,8 +191,8 @@ (message (format "Blacklisting message %d..." msg)) (set-buffer (get-buffer-create mh-temp-buffer)) (erase-buffer) - (call-process (expand-file-name mh-scan-prog mh-progs) mh-junk-background - t nil + (call-process (expand-file-name mh-scan-prog mh-progs) + nil mh-junk-background nil (format "%s" msg) current-folder "-format" "%<(mymbox{from})%|%(addr{from})%>") (goto-char (point-min))