Mercurial > emacs
diff lisp/compare-w.el @ 72432:ceec9309d859
(compare-windows): lambda's take an arg and pass
it to compare-windows-skip-whitespace.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Thu, 17 Aug 2006 15:21:57 +0000 |
parents | 7b77bbd3e40c |
children | ddcbd2c1b70d 6823a91487f2 |
line wrap: on
line diff
--- a/lisp/compare-w.el Thu Aug 17 15:10:21 2006 +0000 +++ b/lisp/compare-w.el Thu Aug 17 15:21:57 2006 +0000 @@ -191,14 +191,16 @@ (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)