From xemacs-m  Mon Mar 24 16:51:21 1997
Received: from GS213.SP.CS.CMU.EDU (GS213.SP.CS.CMU.EDU [128.2.209.183])
	by xemacs.org (8.8.5/8.8.5) with SMTP id QAA19975
	for <xemacs-beta@xemacs.org>; Mon, 24 Mar 1997 16:51:19 -0600 (CST)
Received: by GS213.SP.CS.CMU.EDU (AIX 3.2/UCB 5.64/4.03)
          id AA34861; Mon, 24 Mar 1997 17:51:14 -0500
Date: Mon, 24 Mar 1997 17:51:14 -0500
Message-Id: <9703242251.AA34861@GS213.SP.CS.CMU.EDU>
From: Darrell Kindred <dkindred@cmu.edu>
To: xemacs-beta@xemacs.org
Subject: 19.15b104: isearch PATCH
Organization: Carnegie Mellon University School of Computer Science

Annoying isearch bug induced by the new describe-function
behavior:

   xemacs -q etc/TUTORIAL
   C-s obstruct C-h
   "Args out of range: #<buffer "*Help*">, 1, 38112"

The patch below fixes it.  I think it should be applied to
19.15 if possible.  It only affects the isearch-mode-help
function, which is completely broken as it stands, so the
patch could hardly make things worse.

- Darrell

--- lisp/prim/isearch-mode.el.orig	Sat Mar  8 21:37:40 1997
+++ lisp/prim/isearch-mode.el	Mon Mar 24 17:44:39 1997
@@ -384,7 +384,9 @@
 ;; good way to fix it, though.  -hniksic
 (defun isearch-mode-help ()
   (interactive "_")
-  (describe-function 'isearch-forward)
+  (let ((w (selected-window)))
+    (describe-function 'isearch-forward)
+    (select-window w))
   (isearch-update))
 
 

