diff options
| author | Karl Heuer | 1997-02-09 23:02:19 +0000 |
|---|---|---|
| committer | Karl Heuer | 1997-02-09 23:02:19 +0000 |
| commit | 5ff083afb4c48a45d091a70fd9d260d5456aa7f6 (patch) | |
| tree | 870874173a1bbbb92d1f49908df0c043a0ecc9c6 | |
| parent | 8c9dbabe64160ab8a31e04556014cf8c0a003dff (diff) | |
| download | emacs-5ff083afb4c48a45d091a70fd9d260d5456aa7f6.tar.gz emacs-5ff083afb4c48a45d091a70fd9d260d5456aa7f6.zip | |
Fix previous change.
| -rw-r--r-- | lisp/compare-w.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/compare-w.el b/lisp/compare-w.el index 7a01c302096..479bd72125e 100644 --- a/lisp/compare-w.el +++ b/lisp/compare-w.el | |||
| @@ -1,6 +1,6 @@ | |||
| 1 | ;;; compare-w.el --- compare text between windows for Emacs. | 1 | ;;; compare-w.el --- compare text between windows for Emacs. |
| 2 | 2 | ||
| 3 | ;; Copyright (C) 1986, 1989, 1993 Free Software Foundation, Inc. | 3 | ;; Copyright (C) 1986, 1989, 1993, 1997 Free Software Foundation, Inc. |
| 4 | 4 | ||
| 5 | ;; Maintainer: FSF | 5 | ;; Maintainer: FSF |
| 6 | 6 | ||
| @@ -98,7 +98,7 @@ If `compare-ignore-case' is non-nil, changes in case are also ignored." | |||
| 98 | (goto-char p2) | 98 | (goto-char p2) |
| 99 | (setq result2 (funcall skip-func opoint2)) | 99 | (setq result2 (funcall skip-func opoint2)) |
| 100 | (setq p2a (point)) | 100 | (setq p2a (point)) |
| 101 | (if (or (stringp skip-whitespace) | 101 | (if (or (stringp compare-windows-whitespace) |
| 102 | (and result1 result2 (eq result1 result2))) | 102 | (and result1 result2 (eq result1 result2))) |
| 103 | (setq p1 p1a | 103 | (setq p1 p1a |
| 104 | p2 p2a))))) | 104 | p2 p2a))))) |