Mercurial > emacs

comparison lisp/isearch.el @ 2296:91fe00141e95

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* isearch.el (isearch-switch-frame-handler): Call handle-switch-frame instead of select-frame; it has been renamed.
author Jim Blandy <jimb@redhat.com>
date Sun, 21 Mar 1993 05:50:17 +0000
parents fb0ed5a1d0f3
children fd15462e52a1
comparison
equal deleted inserted replaced
2295:0d8ce1b8ceee 2296:91fe00141e95
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 16:44:50 $|$Revision: 1.25 $ 7 ;; |$Date: 1993/03/17 17:17:05 $|$Revision: 1.26 $
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: /gd/gnu/emacs/19.0/lisp/RCS/isearch.el,v 1.25 1993/03/17 16:44:50 eric Exp eric $ 95 ;;; $Header: /home/gd/gnu/emacs/19.0/lisp/RCS/isearch.el,v 1.26 1993/03/17 17:17:05 eric Exp jimb $
96 ;;; $Log: isearch.el,v $ 96 ;;; $Log: isearch.el,v $
97 ; Revision 1.26 1993/03/17 17:17:05 eric
98 ; Add standard library headers.
99 ;
97 ; Revision 1.25 1993/03/17 16:44:50 eric 100 ; Revision 1.25 1993/03/17 16:44:50 eric
98 ; Add standard library headers. 101 ; Add standard library headers.
99 ; 102 ;
100 ; Revision 1.24 1993/03/17 15:58:09 eric 103 ; Revision 1.24 1993/03/17 15:58:09 eric
101 ; Add standard library headers. 104 ; Add standard library headers.
700 ;; For Emacs 19, the frame switch event is handled. 703 ;; For Emacs 19, the frame switch event is handled.
701 (defun isearch-switch-frame-handler () 704 (defun isearch-switch-frame-handler ()
702 (interactive) ;; Is this necessary? 705 (interactive) ;; Is this necessary?
703 ;; First terminate isearch-mode. 706 ;; First terminate isearch-mode.
704 (isearch-done) 707 (isearch-done)
705 (select-frame (car (cdr (isearch-last-command-char))))) 708 (handle-switch-frame (car (cdr (isearch-last-command-char)))))
706 709
707 ;;;======================================================== 710 ;;;========================================================
708 711
709 712
710 ;;;==================================================== 713 ;;;====================================================