[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/mh-e/mh-junk.el
From: |
Bill Wohler |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/mh-e/mh-junk.el |
Date: |
Sat, 28 May 2005 18:04:59 -0400 |
Index: emacs/lisp/mh-e/mh-junk.el
diff -c emacs/lisp/mh-e/mh-junk.el:1.6 emacs/lisp/mh-e/mh-junk.el:1.7
*** emacs/lisp/mh-e/mh-junk.el:1.6 Wed May 18 11:01:20 2005
--- emacs/lisp/mh-e/mh-junk.el Sat May 28 22:04:54 2005
***************
*** 1,6 ****
;;; mh-junk.el --- Interface to anti-spam measures
! ;; Copyright (C) 2005 Free Software Foundation, Inc.
;; Author: Satyaki Das <address@hidden>,
;; Bill Wohler <address@hidden>
--- 1,6 ----
;;; mh-junk.el --- Interface to anti-spam measures
! ;; Copyright (C) 2003, 2004 Free Software Foundation, Inc.
;; Author: Satyaki Das <address@hidden>,
;; Bill Wohler <address@hidden>
***************
*** 191,198 ****
(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
(format "%s" msg) current-folder
"-format" "%<(mymbox{from})%|%(addr{from})%>")
(goto-char (point-min))
--- 191,198 ----
(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)
! nil mh-junk-background nil
(format "%s" msg) current-folder
"-format" "%<(mymbox{from})%|%(addr{from})%>")
(goto-char (point-min))