[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs/lisp/mail rmailsum.el
From: |
Glenn Morris |
Subject: |
[Emacs-diffs] emacs/lisp/mail rmailsum.el |
Date: |
Fri, 30 Jan 2009 07:20:58 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Changes by: Glenn Morris <gm> 09/01/30 07:20:58
Modified files:
lisp/mail : rmailsum.el
Log message:
(rmail-header-summary): Use line-end-position.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/mail/rmailsum.el?cvsroot=emacs&r1=1.162&r2=1.163
Patches:
Index: rmailsum.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/mail/rmailsum.el,v
retrieving revision 1.162
retrieving revision 1.163
diff -u -b -r1.162 -r1.163
--- rmailsum.el 30 Jan 2009 03:47:38 -0000 1.162
+++ rmailsum.el 30 Jan 2009 07:20:58 -0000 1.163
@@ -492,7 +492,7 @@
(if (not (re-search-forward "^Date:" nil t))
" "
(cond ((re-search-forward "\\([^0-9:]\\)\\([0-3]?[0-9]\\)\\([-
\t_]+\\)\\([adfjmnos][aceopu][bcglnprtvy]\\)"
- (save-excursion (end-of-line) (point)) t)
+ (line-end-position) t)
(format "%2d-%3s"
(string-to-number (buffer-substring
(match-beginning 2)
@@ -500,7 +500,7 @@
(buffer-substring
(match-beginning 4) (match-end 4))))
((re-search-forward
"\\([^a-z]\\)\\([adfjmnos][acepou][bcglnprtvy]\\)\\([-a-z
\t_]*\\)\\([0-9][0-9]?\\)"
- (save-excursion (end-of-line) (point)) t)
+ (line-end-position) t)
(format "%2d-%3s"
(string-to-number (buffer-substring
(match-beginning 4)
@@ -508,7 +508,7 @@
(buffer-substring
(match-beginning 2) (match-end 2))))
((re-search-forward
"\\(19\\|20\\)\\([0-9][0-9]\\)-\\([01][0-9]\\)-\\([0-3][0-9]\\)"
- (save-excursion (end-of-line) (point)) t)
+ (line-end-position) t)
(format "%2s%2s%2s"
(buffer-substring
(match-beginning 2) (match-end 2))
- [Emacs-diffs] emacs/lisp/mail rmailsum.el, Chong Yidong, 2009/01/23
- [Emacs-diffs] emacs/lisp/mail rmailsum.el, Chong Yidong, 2009/01/26
- [Emacs-diffs] emacs/lisp/mail rmailsum.el, Chong Yidong, 2009/01/26
- [Emacs-diffs] emacs/lisp/mail rmailsum.el, Glenn Morris, 2009/01/26
- [Emacs-diffs] emacs/lisp/mail rmailsum.el, Glenn Morris, 2009/01/27
- [Emacs-diffs] emacs/lisp/mail rmailsum.el, Glenn Morris, 2009/01/28
- [Emacs-diffs] emacs/lisp/mail rmailsum.el,
Glenn Morris <=