diff options
| author | Richard M. Stallman | 2001-11-13 16:39:40 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2001-11-13 16:39:40 +0000 |
| commit | fad241d332d59401ef28aadef2589634ccb25d26 (patch) | |
| tree | 1d41b6ee729e69d4ae9a80df1f8382a331c83974 | |
| parent | 5ebcaf360935d9219372ad014b79825aebc94cb6 (diff) | |
| download | emacs-fad241d332d59401ef28aadef2589634ccb25d26.tar.gz emacs-fad241d332d59401ef28aadef2589634ccb25d26.zip | |
(isearch-mode): Handle negative search-slow-window-lines correctly.
(isearch-whitespace-chars): Doc fix.
| -rw-r--r-- | lisp/ChangeLog | 7 | ||||
| -rw-r--r-- | lisp/isearch.el | 5 |
2 files changed, 10 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 832c70ad3e6..776969a11fb 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,10 @@ | |||
| 1 | 2001-11-13 Per Starback <starback@ling.uu.se> | ||
| 2 | |||
| 3 | * isearch.el (isearch-whitespace-chars): Doc fix. | ||
| 4 | |||
| 5 | * isearch.el (isearch-mode): Handle negative search-slow-window-lines | ||
| 6 | correctly. | ||
| 7 | |||
| 1 | 2001-11-13 Stefan Monnier <monnier@cs.yale.edu> | 8 | 2001-11-13 Stefan Monnier <monnier@cs.yale.edu> |
| 2 | 9 | ||
| 3 | * progmodes/ada-mode.el (ada-fill-comment-prefix): GNAT wants 2 spaces. | 10 | * progmodes/ada-mode.el (ada-fill-comment-prefix): GNAT wants 2 spaces. |
diff --git a/lisp/isearch.el b/lisp/isearch.el index 5d770d89706..29590e4f9f6 100644 --- a/lisp/isearch.el +++ b/lisp/isearch.el | |||
| @@ -547,7 +547,8 @@ is treated as a regexp. See \\[isearch-forward] for more info." | |||
| 547 | isearch-within-brackets nil | 547 | isearch-within-brackets nil |
| 548 | isearch-slow-terminal-mode (and (<= baud-rate search-slow-speed) | 548 | isearch-slow-terminal-mode (and (<= baud-rate search-slow-speed) |
| 549 | (> (window-height) | 549 | (> (window-height) |
| 550 | (* 4 search-slow-window-lines))) | 550 | (* 4 |
| 551 | (abs search-slow-window-lines)))) | ||
| 551 | isearch-other-end nil | 552 | isearch-other-end nil |
| 552 | isearch-small-window nil | 553 | isearch-small-window nil |
| 553 | isearch-just-started t | 554 | isearch-just-started t |
| @@ -1327,7 +1328,7 @@ Obsolete." | |||
| 1327 | 1328 | ||
| 1328 | (defun isearch-whitespace-chars () | 1329 | (defun isearch-whitespace-chars () |
| 1329 | "Match all whitespace chars, if in regexp mode. | 1330 | "Match all whitespace chars, if in regexp mode. |
| 1330 | If you want to search for just a space, type \\[quoted-insert] SPC." | 1331 | If you want to search for just a space, type \\<isearch-mode-map>\\[isearch-quote-char] SPC." |
| 1331 | (interactive) | 1332 | (interactive) |
| 1332 | (if isearch-regexp | 1333 | (if isearch-regexp |
| 1333 | (if (and search-whitespace-regexp (not isearch-within-brackets) | 1334 | (if (and search-whitespace-regexp (not isearch-within-brackets) |