diff options
author | Richard M. Stallman <rms@gnu.org> | 1998-08-14 04:12:01 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1998-08-14 04:12:01 +0000 |
commit | 138b07c857175359a710b50b0bc85713a4a6564e (patch) | |
tree | 0ef5950c97d94194121ea53ed190ec8ca4e820c5 /lisp/ediff-util.el | |
parent | 710ea1b88df094830200f6082163b231591f0250 (diff) | |
download | emacs-138b07c857175359a710b50b0bc85713a4a6564e.tar.gz |
(ediff-next-difference, ediff-previous-difference): Handle nil as arg.
Diffstat (limited to 'lisp/ediff-util.el')
-rw-r--r-- | lisp/ediff-util.el | 4 |
1 files changed, 2 insertions, 2 deletions
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) |