[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs/lisp ChangeLog mail/rmail.el
From: |
Glenn Morris |
Subject: |
[Emacs-diffs] emacs/lisp ChangeLog mail/rmail.el |
Date: |
Fri, 30 Jan 2009 07:23:05 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Changes by: Glenn Morris <gm> 09/01/30 07:23:05
Modified files:
lisp : ChangeLog
lisp/mail : rmail.el
Log message:
(rmail-speedbar-buttons, rmail-speedbar-move-message-to-folder-on-line):
Use line-end-position.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.15215&r2=1.15216
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/mail/rmail.el?cvsroot=emacs&r1=1.480&r2=1.481
Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.15215
retrieving revision 1.15216
diff -u -b -r1.15215 -r1.15216
--- ChangeLog 30 Jan 2009 03:47:35 -0000 1.15215
+++ ChangeLog 30 Jan 2009 07:23:01 -0000 1.15216
@@ -1,9 +1,12 @@
2009-01-30 Glenn Morris <address@hidden>
* mail/rmail.el (rmail-reply): Handle empty folders.
+ (rmail-speedbar-buttons)
+ (rmail-speedbar-move-message-to-folder-on-line): Use line-end-position.
* mail/rmailsum.el (rmail-summary-update-line): Replace duplicate
line-beginning-position calls.
+ (rmail-header-summary): Use line-end-position.
2009-01-30 Toby Speight <address@hidden> (tiny change)
Index: mail/rmail.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/mail/rmail.el,v
retrieving revision 1.480
retrieving revision 1.481
diff -u -b -r1.480 -r1.481
--- mail/rmail.el 30 Jan 2009 03:46:31 -0000 1.480
+++ mail/rmail.el 30 Jan 2009 07:23:05 -0000 1.481
@@ -3857,9 +3857,7 @@
(setq from t)))
(if from
nil
- (setq from (buffer-substring (point) (save-excursion
- (end-of-line)
- (point))))))
+ (setq from (buffer-substring (point) (line-end-position)))))
(goto-char (point-min))
(if (and (looking-at "Reply to:")
(equal from rmail-speedbar-last-user))
@@ -3900,7 +3898,7 @@
(interactive)
(save-excursion
(beginning-of-line)
- (if (re-search-forward "<M> " (save-excursion (end-of-line) (point)) t)
+ (if (re-search-forward "<M> " (line-end-position) t)
(progn
(forward-char -2)
(speedbar-do-function-pointer)))))
- [Emacs-diffs] emacs/lisp ChangeLog mail/rmail.el, Stefan Monnier, 2009/01/23
- [Emacs-diffs] emacs/lisp ChangeLog mail/rmail.el, Glenn Morris, 2009/01/23
- [Emacs-diffs] emacs/lisp ChangeLog mail/rmail.el, Glenn Morris, 2009/01/25
- [Emacs-diffs] emacs/lisp ChangeLog mail/rmail.el, Glenn Morris, 2009/01/27
- [Emacs-diffs] emacs/lisp ChangeLog mail/rmail.el, Glenn Morris, 2009/01/27
- [Emacs-diffs] emacs/lisp ChangeLog mail/rmail.el,
Glenn Morris <=
- [Emacs-diffs] emacs/lisp ChangeLog mail/rmail.el, Stefan Monnier, 2009/01/31