Mercurial > emacs

comparison lisp/isearch.el @ 2425:fd15462e52a1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(isearch-mode-map): Delete the binding for C-h.
author Richard M. Stallman <rms@gnu.org>
date Tue, 30 Mar 1993 19:38:34 +0000
parents 91fe00141e95
children e59a5b9d95d6
comparison
equal deleted inserted replaced
2424:dbdccee84df3 2425:fd15462e52a1
2 2
3 ;; Copyright (C) 1992 Free Software Foundation, Inc. 3 ;; Copyright (C) 1992 Free Software Foundation, Inc.
4 4
5 ;; Author: Daniel LaLiberte <liberte@cs.uiuc.edu> 5 ;; Author: Daniel LaLiberte <liberte@cs.uiuc.edu>
6 6
7 ;; |$Date: 1993/03/17 17:17:05 $|$Revision: 1.26 $ 7 ;; |$Date: 1993/03/21 05:50:17 $|$Revision: 1.27 $
8 8
9 ;; This file is not yet part of GNU Emacs, but it is based almost 9 ;; This file is not yet part of GNU Emacs, but it is based almost
10 ;; entirely on isearch.el which is part of GNU Emacs. 10 ;; entirely on isearch.el which is part of GNU Emacs.
11 11
12 ;; GNU Emacs is distributed in the hope that it will be useful, 12 ;; GNU Emacs is distributed in the hope that it will be useful,
90 ;;; Change Log: 90 ;;; Change Log:
91 91
92 ;;;==================================================================== 92 ;;;====================================================================
93 ;;; Change History 93 ;;; Change History
94 94
95 ;;; $Header: /home/gd/gnu/emacs/19.0/lisp/RCS/isearch.el,v 1.26 1993/03/17 17:17:05 eric Exp jimb $ 95 ;;; $Header: /gd/gnu/emacs/19.0/lisp/RCS/isearch.el,v 1.27 1993/03/21 05:50:17 jimb Exp rms $
96 ;;; $Log: isearch.el,v $ 96 ;;; $Log: isearch.el,v $
97 ; Revision 1.27 1993/03/21 05:50:17 jimb
98 ; * isearch.el (isearch-switch-frame-handler): Call
99 ; handle-switch-frame instead of select-frame; it has been renamed.
100 ;
97 ; Revision 1.26 1993/03/17 17:17:05 eric 101 ; Revision 1.26 1993/03/17 17:17:05 eric
98 ; Add standard library headers. 102 ; Add standard library headers.
99 ; 103 ;
100 ; Revision 1.25 1993/03/17 16:44:50 eric 104 ; Revision 1.25 1993/03/17 16:44:50 eric
101 ; Add standard library headers. 105 ; Add standard library headers.
347 ;; Nothing special for + because it matches at least once. 351 ;; Nothing special for + because it matches at least once.
348 (define-key map "*" 'isearch-*-char) 352 (define-key map "*" 'isearch-*-char)
349 (define-key map "?" 'isearch-*-char) 353 (define-key map "?" 'isearch-*-char)
350 (define-key map "|" 'isearch-|-char) 354 (define-key map "|" 'isearch-|-char)
351 355
352 ;; You can reenable global keys by binding them locally to nil. 356 ;;; Turned off because I find I expect to get the global definition--rms.
353 ;; For the help char this doesnt work quite as expected because 357 ;;; ;; Instead bind C-h to special help command for isearch-mode.
354 ;; isearch-mode is not a major mode. Also the echo area is not 358 ;;; (define-key map "\C-h" 'isearch-mode-help)
355 ;; restored after the help command while isearch-mode is
356 ;; still active. Furthermore, we should not assume that the
357 ;; help-command is on C-h. But here is how it would be done:
358 ;; (define-key map "\C-h" nil)
359
360 ;; Instead bind C-h to special help command for isearch-mode.
361 (define-key map "\C-h" 'isearch-mode-help)
362 359
363 ;; To handle local bindings with meta char prefix keys, define 360 ;; To handle local bindings with meta char prefix keys, define
364 ;; another full keymap. This must be done for any other prefix 361 ;; another full keymap. This must be done for any other prefix
365 ;; keys as well, one full keymap per char of the prefix key. It 362 ;; keys as well, one full keymap per char of the prefix key. It
366 ;; would be simpler to disable the global keymap, and/or have a 363 ;; would be simpler to disable the global keymap, and/or have a