From: Richard M. Stallman Date: Fri, 14 Aug 1998 04:12:01 +0000 (+0000) Subject: (ediff-next-difference, ediff-previous-difference): Handle nil as arg. X-Git-Tag: emacs-20.3~62 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=138b07c857175359a710b50b0bc85713a4a6564e;p=emacs.git (ediff-next-difference, ediff-previous-difference): Handle nil as arg. --- diff --git a/lisp/ediff-util.el b/lisp/ediff-util.el index 4b790e4c6c9..320e6ac5ec8 100644 --- a/lisp/ediff-util.el +++ b/lisp/ediff-util.el @@ -1631,7 +1631,7 @@ With a prefix argument, go forward that many differences." (ediff-barf-if-not-control-buffer) (if (< ediff-current-difference ediff-number-of-differences) (let ((n (min ediff-number-of-differences - (+ ediff-current-difference arg))) + (+ ediff-current-difference (or arg 1)))) non-clash-skip regexp-skip) (ediff-visible-region) @@ -1670,7 +1670,7 @@ With a prefix argument, go back that many differences." (interactive "p") (ediff-barf-if-not-control-buffer) (if (> ediff-current-difference -1) - (let ((n (max -1 (- ediff-current-difference arg))) + (let ((n (max -1 (- ediff-current-difference (or arg 1)))) non-clash-skip regexp-skip) (ediff-visible-region)