From e9283e70e6bf5ac82ee581bbae7cbb8d6a75525d Mon Sep 17 00:00:00 2001 From: Martin Rudalics Date: Mon, 29 Oct 2007 06:48:22 +0000 Subject: (wdired-next-line, wdired-previous-line): Use next-line and previous-line wrapped in with-no-warnings. --- lisp/wdired.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lisp/wdired.el') diff --git a/lisp/wdired.el b/lisp/wdired.el index 0c75592bd03..25798cce64e 100644 --- a/lisp/wdired.el +++ b/lisp/wdired.el @@ -499,7 +499,7 @@ Optional arguments are ignored." See `wdired-use-dired-vertical-movement'. Optional prefix ARG says how many lines to move; default is one line." (interactive "p") - (forward-line arg) + (with-no-warnings (next-line arg)) (if (or (eq wdired-use-dired-vertical-movement t) (and wdired-use-dired-vertical-movement (< (current-column) @@ -512,7 +512,7 @@ says how many lines to move; default is one line." See `wdired-use-dired-vertical-movement'. Optional prefix ARG says how many lines to move; default is one line." (interactive "p") - (forward-line (- arg)) + (with-no-warnings (previous-line arg)) (if (or (eq wdired-use-dired-vertical-movement t) (and wdired-use-dired-vertical-movement (< (current-column) -- cgit v1.2.1