/[emacs]/emacs/lisp/isearch.el
ViewVC logotype

Diff of /emacs/lisp/isearch.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.209 by rms, Wed Feb 6 15:25:15 2002 UTC revision 1.209.2.1 by handa, Fri Mar 1 01:59:51 2002 UTC
# Line 235  Default value, nil, means edit the strin Line 235  Default value, nil, means edit the strin
235          (char-table-p (nth 1 map))          (char-table-p (nth 1 map))
236          (error "The initialization of isearch-mode-map must be updated"))          (error "The initialization of isearch-mode-map must be updated"))
237      ;; Make all multibyte characters search for themselves.      ;; Make all multibyte characters search for themselves.
238      (let ((l (generic-character-list))      (set-char-table-range (nth 1 map) (cons #x100 #x2FFFFF)
239            (table (nth 1 map)))                            'isearch-printing-char)
       (while l  
         (set-char-table-default table (car l) 'isearch-printing-char)  
         (setq l (cdr l))))  
240      ;; Make function keys, etc, exit the search.      ;; Make function keys, etc, exit the search.
241      (define-key map [t] 'isearch-other-control-char)      (define-key map [t] 'isearch-other-control-char)
242      ;; Control chars, by default, end isearch mode transparently.      ;; Control chars, by default, end isearch mode transparently.

Legend:
Removed from v.1.209  
changed lines
  Added in v.1.209.2.1

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26