emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] Changes to emacs/lisp/gnus/nnmail.el


From: Juanma Barranquero
Subject: [Emacs-diffs] Changes to emacs/lisp/gnus/nnmail.el
Date: Tue, 04 Feb 2003 08:06:41 -0500

Index: emacs/lisp/gnus/nnmail.el
diff -c emacs/lisp/gnus/nnmail.el:1.18 emacs/lisp/gnus/nnmail.el:1.19
*** emacs/lisp/gnus/nnmail.el:1.18      Wed Jan 15 20:19:03 2003
--- emacs/lisp/gnus/nnmail.el   Tue Feb  4 08:06:38 2003
***************
*** 316,322 ****
  GROUP: Mail will be stored in GROUP (a string).
  
  \(FIELD VALUE [- RESTRICT [- RESTRICT [...]]] SPLIT): If the message
!   field FIELD (a regexp) contains VALUE (a regexp), store the messages 
    as specified by SPLIT.  If RESTRICT (a regexp) matches some string
    after FIELD and before the end of the matched VALUE, return nil,
    otherwise process SPLIT.  Multiple RESTRICTs add up, further
--- 316,322 ----
  GROUP: Mail will be stored in GROUP (a string).
  
  \(FIELD VALUE [- RESTRICT [- RESTRICT [...]]] SPLIT): If the message
!   field FIELD (a regexp) contains VALUE (a regexp), store the messages
    as specified by SPLIT.  If RESTRICT (a regexp) matches some string
    after FIELD and before the end of the matched VALUE, return nil,
    otherwise process SPLIT.  Multiple RESTRICTs add up, further
***************
*** 364,375 ****
             (any \"address@hidden" \"procmail.list\")
             (any \"address@hidden" \"SmartList.list\")
               ;; Both lists below have the same suffix, so prevent
!              ;; cross-posting to mkpkg.list of messages posted only to 
               ;; the bugs- list, but allow cross-posting when the
               ;; message was really cross-posted.
               (any \"address@hidden" \"mypkg.bugs\")
               (any \"address@hidden" - \"bugs-mypackage\" \"mypkg.list\")
!              ;; 
             ;; People...
             (any \"address@hidden" \"people.Lars Magne Ingebrigtsen\"))
          ;; Unmatched mail goes to the catch all group.
--- 364,375 ----
             (any \"address@hidden" \"procmail.list\")
             (any \"address@hidden" \"SmartList.list\")
               ;; Both lists below have the same suffix, so prevent
!              ;; cross-posting to mkpkg.list of messages posted only to
               ;; the bugs- list, but allow cross-posting when the
               ;; message was really cross-posted.
               (any \"address@hidden" \"mypkg.bugs\")
               (any \"address@hidden" - \"bugs-mypackage\" \"mypkg.list\")
!              ;;
             ;; People...
             (any \"address@hidden" \"people.Lars Magne Ingebrigtsen\"))
          ;; Unmatched mail goes to the catch all group.
***************
*** 1047,1053 ****
    (let (lines chars)
      (save-excursion
        (goto-char (point-min))
!       (unless (search-forward "\n\n" nil t) 
        (goto-char (point-max))
        (insert "\n"))
        (setq chars (- (point-max) (point)))
--- 1047,1053 ----
    (let (lines chars)
      (save-excursion
        (goto-char (point-min))
!       (unless (search-forward "\n\n" nil t)
        (goto-char (point-max))
        (insert "\n"))
        (setq chars (- (point-max) (point)))




reply via email to

[Prev in Thread] Current Thread [Next in Thread]