summaryrefslogtreecommitdiff
path: root/lisp/compare-w.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/compare-w.el')
-rw-r--r--lisp/compare-w.el6
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/compare-w.el b/lisp/compare-w.el
index 3aa01424fb5..8dc0ac1e330 100644
--- a/lisp/compare-w.el
+++ b/lisp/compare-w.el
@@ -191,14 +191,16 @@ on third call it again advances points to the next difference and so on."
(setq skip-func-1 (if ignore-whitespace
(if (stringp compare-windows-whitespace)
- (lambda () (compare-windows-skip-whitespace)
+ (lambda (pos)
+ (compare-windows-skip-whitespace pos)
t)
compare-windows-whitespace)))
(with-current-buffer b2
(setq skip-func-2 (if ignore-whitespace
(if (stringp compare-windows-whitespace)
- (lambda () (compare-windows-skip-whitespace)
+ (lambda (pos)
+ (compare-windows-skip-whitespace pos)
t)
compare-windows-whitespace)))
(push-mark p2 t)