36 |
:prefix "compare-" |
:prefix "compare-" |
37 |
:group 'tools) |
:group 'tools) |
38 |
|
|
39 |
(defcustom compare-windows-whitespace "\\s-+" |
(defcustom compare-windows-whitespace "\\(\\s-\\|\n\\)+" |
40 |
"*Regexp that defines whitespace sequences for \\[compare-windows]. |
"*Regexp that defines whitespace sequences for \\[compare-windows]. |
41 |
Changes in whitespace are optionally ignored. |
That command optionally ignores changes in whitespace. |
42 |
|
|
43 |
The value of `compare-windows-whitespace' may instead be a function; this |
The value of `compare-windows-whitespace' is normally a regexp, but it |
44 |
function is called in each buffer, with point at the current scanning point. |
can also be a function. The function's job is to categorize any |
45 |
The function's job is to categorize any whitespace around (including before) |
whitespace around (including before) point; it should also advance |
46 |
point; it should also advance past any whitespace. |
past any whitespace. The function is called in each buffer, with |
47 |
|
point at the current scanning point. It gets one argument, the point |
48 |
|
where `compare-windows' was originally called; it should not look at |
49 |
|
any text before that point. |
50 |
|
|
|
The function is passed one argument, the point where `compare-windows' |
|
|
was originally called; it should not consider any text before that point. |
|
51 |
If the function returns the same value for both buffers, then the |
If the function returns the same value for both buffers, then the |
52 |
whitespace is considered to match, and is skipped." |
whitespace is considered to match, and is skipped." |
53 |
:type '(choice regexp function) |
:type '(choice regexp function) |