[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs/lisp/gnus ChangeLog gnus-salt.el
From: |
Glenn Morris |
Subject: |
[Emacs-diffs] emacs/lisp/gnus ChangeLog gnus-salt.el |
Date: |
Tue, 01 Sep 2009 03:07:15 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Changes by: Glenn Morris <gm> 09/09/01 03:07:13
Modified files:
lisp/gnus : ChangeLog gnus-salt.el
Log message:
(gnus-pick-mouse-pick-region): Use forward-line rather than goto-line.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/gnus/ChangeLog?cvsroot=emacs&r1=1.820&r2=1.821
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/gnus/gnus-salt.el?cvsroot=emacs&r1=1.22&r2=1.23
Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/gnus/ChangeLog,v
retrieving revision 1.820
retrieving revision 1.821
diff -u -b -r1.820 -r1.821
--- ChangeLog 29 Aug 2009 03:03:24 -0000 1.820
+++ ChangeLog 1 Sep 2009 03:07:11 -0000 1.821
@@ -1,3 +1,8 @@
+2009-09-01 Glenn Morris <address@hidden>
+
+ * gnus-salt.el (gnus-pick-mouse-pick-region): Use forward-line rather
+ than goto-line.
+
2009-08-29 Stefan Monnier <address@hidden>
* spam.el (spam-ifile-path, spam-bogofilter-path, spam-sa-learn-path)
Index: gnus-salt.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/gnus/gnus-salt.el,v
retrieving revision 1.22
retrieving revision 1.23
diff -u -b -r1.22 -r1.23
--- gnus-salt.el 5 Jan 2009 03:22:03 -0000 1.22
+++ gnus-salt.el 1 Sep 2009 03:07:12 -0000 1.23
@@ -1,7 +1,7 @@
;;; gnus-salt.el --- alternate summary mode interfaces for Gnus
-;; Copyright (C) 1996, 1997, 1998, 1999, 2001, 2002, 2003, 2004,
-;; 2005, 2006, 2007, 2008, 2009 Free Software Foundation, Inc.
+;; Copyright (C) 1996, 1997, 1998, 1999, 2001, 2002, 2003, 2004, 2005,
+;; 2006, 2007, 2008, 2009 Free Software Foundation, Inc.
;; Author: Lars Magne Ingebrigtsen <address@hidden>
;; Keywords: news
@@ -273,9 +273,9 @@
(let* ((this-line (1+ (count-lines (point-min) end-point)))
(min-line (min this-line start-line))
(max-line (max this-line start-line)))
- ;; Why not use `forward-line'? --Stef
(while (< min-line max-line)
- (goto-line min-line)
+ (goto-char (point-min))
+ (forward-line (1- min-line))
(gnus-pick-article)
(setq min-line (1+ min-line)))
(setq start-line this-line))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] emacs/lisp/gnus ChangeLog gnus-salt.el,
Glenn Morris <=