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/nndoc.el


From: Miles Bader
Subject: [Emacs-diffs] Changes to emacs/lisp/gnus/nndoc.el
Date: Fri, 04 Apr 2003 01:22:15 -0500

Index: emacs/lisp/gnus/nndoc.el
diff -c emacs/lisp/gnus/nndoc.el:1.5 emacs/lisp/gnus/nndoc.el:1.6
*** emacs/lisp/gnus/nndoc.el:1.5        Fri Jun 21 14:56:00 2002
--- emacs/lisp/gnus/nndoc.el    Tue Feb  4 08:06:38 2003
***************
*** 630,636 ****
          (setq subject (concat " (" (match-string 1) ")"))
          (when (re-search-forward "^From: \\(.*\\)" nil t)
            (setq from (concat "<"
!                              (cadr (funcall gnus-extract-address-components 
                                              (match-string 1))) ">")))
          (if (re-search-forward "^Date: +\\([^(]*\\)" nil t)
              (setq date (match-string 1))
--- 630,636 ----
          (setq subject (concat " (" (match-string 1) ")"))
          (when (re-search-forward "^From: \\(.*\\)" nil t)
            (setq from (concat "<"
!                              (cadr (funcall gnus-extract-address-components
                                              (match-string 1))) ">")))
          (if (re-search-forward "^Date: +\\([^(]*\\)" nil t)
              (setq date (match-string 1))




reply via email to

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