Mercurial > emacs
changeset 17781:1da61113c0c9
(isearch-mode-map): Treat Latin-1, Latin-2 an Latin-3
chars as printing characters.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Mon, 12 May 1997 23:18:40 +0000 |
parents | df8d082029a6 |
children | 4522860df0cf |
files | lisp/isearch.el |
diffstat | 1 files changed, 6 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/isearch.el Mon May 12 22:04:18 1997 +0000 +++ b/lisp/isearch.el Mon May 12 23:18:40 1997 +0000 @@ -209,11 +209,13 @@ (let* ((i 0) (map (make-keymap))) (or (vectorp (nth 1 map)) + (char-table-p (nth 1 map)) (error "The initialization of isearch-mode-map must be updated")) - ;; Give this map a vector 256 long, for dense binding - ;; of a larger range of ordinary characters. - (setcar (cdr map) (make-vector 256 nil)) - + ;; Make Latin-1, Latin-2 and Latin-3 characters + ;; search for themselves. + (set-char-table-range (nth 1 map) [129] 'isearch-printing-char) + (set-char-table-range (nth 1 map) [130] 'isearch-printing-char) + (set-char-table-range (nth 1 map) [131] 'isearch-printing-char) ;; Make function keys, etc, exit the search. (define-key map [t] 'isearch-other-control-char) ;; Control chars, by default, end isearch mode transparently.