Mercurial > emacs
diff lisp/isearch.el @ 16687:049c87a96dca
Change defconsts to defvars.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Mon, 16 Dec 1996 01:33:02 +0000 |
parents | 1b774e82752f |
children | 890b229ea0c7 |
line wrap: on
line diff
--- a/lisp/isearch.el Mon Dec 16 00:56:13 1996 +0000 +++ b/lisp/isearch.el Mon Dec 16 01:33:02 1996 +0000 @@ -105,7 +105,7 @@ ;;; Some additional options and constants. -(defconst search-exit-option t +(defvar search-exit-option t "*Non-nil means random control characters terminate incremental search.") (defvar search-slow-window-lines 1 @@ -131,7 +131,7 @@ Actually, `isearch-edit-string' is called to let you enter the search string, and RET terminates editing and does a nonincremental search.") -(defconst search-whitespace-regexp "\\s-+" +(defvar search-whitespace-regexp "\\s-+" "*If non-nil, regular expression to match a sequence of whitespace chars. You might want to use something like \"[ \\t\\r\\n]+\" instead.") @@ -151,9 +151,9 @@ (defvar regexp-search-ring nil "List of regular expression search string sequences.") -(defconst search-ring-max 16 +(defvar search-ring-max 16 "*Maximum length of search ring before oldest elements are thrown away.") -(defconst regexp-search-ring-max 16 +(defvar regexp-search-ring-max 16 "*Maximum length of regexp search ring before oldest elements are thrown away.") (defvar search-ring-yank-pointer nil @@ -427,7 +427,7 @@ ;; All the work is done by the isearch-mode commands. ;; Not used yet: -;;(defconst isearch-commands '(isearch-forward isearch-backward +;;(defvar isearch-commands '(isearch-forward isearch-backward ;; isearch-forward-regexp isearch-backward-regexp) ;; "List of commands for which isearch-mode does not recursive-edit.")