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: Eli Zaretskii
Subject: [Emacs-diffs] Changes to emacs/lisp/gnus/nnmail.el
Date: Thu, 16 May 2002 12:02:49 -0400

Index: emacs/lisp/gnus/nnmail.el
diff -c emacs/lisp/gnus/nnmail.el:1.15 emacs/lisp/gnus/nnmail.el:1.16
*** emacs/lisp/gnus/nnmail.el:1.15      Thu Dec 20 14:01:00 2001
--- emacs/lisp/gnus/nnmail.el   Thu May 16 07:56:18 2002
***************
*** 651,657 ****
  
  (defsubst nnmail-search-unix-mail-delim ()
    "Put point at the beginning of the next Unix mbox message."
!   ;; Algorithm used to find the the next article in the
    ;; brain-dead Unix mbox format:
    ;;
    ;; 1) Search for "^From ".
--- 651,657 ----
  
  (defsubst nnmail-search-unix-mail-delim ()
    "Put point at the beginning of the next Unix mbox message."
!   ;; Algorithm used to find the next article in the
    ;; brain-dead Unix mbox format:
    ;;
    ;; 1) Search for "^From ".
***************
*** 680,686 ****
  
  (defun nnmail-search-unix-mail-delim-backward ()
    "Put point at the beginning of the current Unix mbox message."
!   ;; Algorithm used to find the the next article in the
    ;; brain-dead Unix mbox format:
    ;;
    ;; 1) Search for "^From ".
--- 680,686 ----
  
  (defun nnmail-search-unix-mail-delim-backward ()
    "Put point at the beginning of the current Unix mbox message."
!   ;; Algorithm used to find the next article in the
    ;; brain-dead Unix mbox format:
    ;;
    ;; 1) Search for "^From ".
***************
*** 1188,1194 ****
          (let ((split-rest (cddr split))
                (end (match-end 0))
                ;; The searched regexp is \(\(FIELD\).*\)\(VALUE\).  So,
!               ;; start-of-value is the the point just before the
                ;; beginning of the value, whereas after-header-name is
                ;; the point just after the field name.
                (start-of-value (match-end 1))
--- 1188,1194 ----
          (let ((split-rest (cddr split))
                (end (match-end 0))
                ;; The searched regexp is \(\(FIELD\).*\)\(VALUE\).  So,
!               ;; start-of-value is the point just before the
                ;; beginning of the value, whereas after-header-name is
                ;; the point just after the field name.
                (start-of-value (match-end 1))



reply via email to

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