Mercurial > emacs

changeset 95300:cf89ac5d2869

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(proced-next-line, proced-previous-line): Avoid calling `next-line' and `previous-line' from Lisp code.
author John Paul Wallington <jpw@pobox.com>
date Sun, 25 May 2008 22:13:53 +0000
parents a1e891587964
children 05b9a3cdb080
files lisp/proced.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/proced.el	Sun May 25 20:09:23 2008 +0000
+++ b/lisp/proced.el	Sun May 25 22:13:53 2008 +0000
@@ -353,14 +353,14 @@
   "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)