[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/isearch.el,v
From: |
Miles Bader |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/isearch.el,v |
Date: |
Fri, 01 Feb 2008 16:02:47 +0000 |
CVSROOT: /cvsroot/emacs
Module name: emacs
Changes by: Miles Bader <miles> 08/02/01 16:01:31
Index: lisp/isearch.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/isearch.el,v
retrieving revision 1.308
retrieving revision 1.309
diff -u -b -r1.308 -r1.309
--- lisp/isearch.el 8 Jan 2008 20:44:50 -0000 1.308
+++ lisp/isearch.el 1 Feb 2008 16:01:08 -0000 1.309
@@ -311,15 +311,11 @@
(defvar isearch-mode-map
(let* ((i 0)
(map (make-keymap)))
- (or (vectorp (nth 1 map))
- (char-table-p (nth 1 map))
+ (or (char-table-p (nth 1 map))
(error "The initialization of isearch-mode-map must be updated"))
;; Make all multibyte characters search for themselves.
- (let ((l (generic-character-list))
- (table (nth 1 map)))
- (while l
- (set-char-table-default table (car l) 'isearch-printing-char)
- (setq l (cdr l))))
+ (set-char-table-range (nth 1 map) (cons #x100 (max-char))
+ 'isearch-printing-char)
;; Make function keys, etc, which aren't bound to a scrolling-function
;; exit the search.
(define-key map [t] 'isearch-other-control-char)
- [Emacs-diffs] Changes to emacs/lisp/isearch.el,v,
Miles Bader <=
- [Emacs-diffs] Changes to emacs/lisp/isearch.el,v, Bastien Guerry, 2008/02/11
- [Emacs-diffs] Changes to emacs/lisp/isearch.el,v, Miles Bader, 2008/02/24
- [Emacs-diffs] Changes to emacs/lisp/isearch.el,v, Juri Linkov, 2008/02/24
- [Emacs-diffs] Changes to emacs/lisp/isearch.el,v, Kenichi Handa, 2008/02/27