diff options
| author | Glenn Morris <rgm@gnu.org> | 2009-09-01 03:07:11 +0000 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2009-09-01 03:07:11 +0000 |
| commit | 7a4abdd6a767518581665ab73209db3c10fc2b3a (patch) | |
| tree | dfc6113e31cbd3670704679bb64483c9254564c0 /lisp/gnus/gnus-salt.el | |
| parent | d63eb0e7b460e6072b29fac59d6e743d556ba7fc (diff) | |
| download | emacs-7a4abdd6a767518581665ab73209db3c10fc2b3a.tar.gz | |
(gnus-pick-mouse-pick-region): Use forward-line rather than goto-line.
Diffstat (limited to 'lisp/gnus/gnus-salt.el')
| -rw-r--r-- | lisp/gnus/gnus-salt.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/gnus/gnus-salt.el b/lisp/gnus/gnus-salt.el index 1e1aed52b82..9b595a8e3ca 100644 --- a/lisp/gnus/gnus-salt.el +++ b/lisp/gnus/gnus-salt.el @@ -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 <larsi@gnus.org> ;; Keywords: news @@ -273,9 +273,9 @@ This must be bound to a button-down mouse event." (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)) |