From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 13 Nov 2001 16:39:40 +0000 (+0000)
Subject: (isearch-mode): Handle negative search-slow-window-lines correctly.
X-Git-Tag: ttn-vms-21-2-B4~18598
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=fad241d332d59401ef28aadef2589634ccb25d26;p=emacs.git

(isearch-mode): Handle negative search-slow-window-lines correctly.

(isearch-whitespace-chars): Doc fix.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 832c70ad3e6..776969a11fb 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,10 @@
+2001-11-13  Per Starback  <starback@ling.uu.se>
+
+	* isearch.el (isearch-whitespace-chars): Doc fix.
+
+	* isearch.el (isearch-mode): Handle negative search-slow-window-lines
+	correctly.
+
 2001-11-13  Stefan Monnier  <monnier@cs.yale.edu>
 
 	* 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."
 	isearch-within-brackets nil
 	isearch-slow-terminal-mode (and (<= baud-rate search-slow-speed)
 					(> (window-height)
-					   (* 4 search-slow-window-lines)))
+					   (* 4
+					      (abs search-slow-window-lines))))
 	isearch-other-end nil
 	isearch-small-window nil
 	isearch-just-started t
@@ -1327,7 +1328,7 @@ Obsolete."
 
 (defun isearch-whitespace-chars ()
   "Match all whitespace chars, if in regexp mode.
-If you want to search for just a space, type \\[quoted-insert] SPC."
+If you want to search for just a space, type \\<isearch-mode-map>\\[isearch-quote-char] SPC."
   (interactive)
   (if isearch-regexp 
       (if (and search-whitespace-regexp (not isearch-within-brackets)