# HG changeset patch # User Richard M. Stallman # Date 903067921 0 # Node ID 3261e4a5f472f81a7e10975e4ee99ca08978d815 # Parent a8c03459429219206f5ef0de8119255a981511ed (ediff-next-difference, ediff-previous-difference): Handle nil as arg. diff -r a8c034594292 -r 3261e4a5f472 lisp/ediff-util.el --- a/lisp/ediff-util.el Fri Aug 14 03:47:10 1998 +0000 +++ b/lisp/ediff-util.el Fri Aug 14 04:12:01 1998 +0000 @@ -1631,7 +1631,7 @@ (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 @@ (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)