From: John Paul Wallington <jpw@pobox.com>
Date: Sun, 25 May 2008 22:13:53 +0000 (+0000)
Subject: (proced-next-line, proced-previous-line): Avoid calling `next-line'
X-Git-Tag: emacs-pretest-23.0.90~5300
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=27ab83abf9975c65efa9b1ec768982c5766f81cd;p=emacs.git

(proced-next-line, proced-previous-line): Avoid calling `next-line'
and `previous-line' from Lisp code.
---

diff --git a/lisp/proced.el b/lisp/proced.el
index 0a9827dc5eb..fa99eb25d04 100644
--- a/lisp/proced.el
+++ b/lisp/proced.el
@@ -353,14 +353,14 @@ information will be displayed but not selected.
   "Move down lines then position at `proced-goal-column'.
 Optional prefix ARG says how many lines to move; default is one line."
   (interactive "p")
-  (next-line arg)
+  (forward-line arg)
   (proced-move-to-goal-column))
 
 (defun proced-previous-line (arg)
   "Move up lines then position at `proced-goal-column'.
 Optional prefix ARG says how many lines to move; default is one line."
   (interactive "p")
-  (previous-line arg)
+  (forward-line (- arg))
   (proced-move-to-goal-column))
 
 (defun proced-mark (&optional count)