From e1374bcbd901328765928b1357376c17fe8b46df Mon Sep 17 00:00:00 2001 From: Robby Findler Date: Mon, 25 May 2009 19:44:56 +0000 Subject: [PATCH] PR 10259 svn: r14986 --- collects/framework/private/frame.ss | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/framework/private/frame.ss b/collects/framework/private/frame.ss index e1db4bb9ab..e83f27b278 100644 --- a/collects/framework/private/frame.ss +++ b/collects/framework/private/frame.ss @@ -1763,7 +1763,7 @@ [top-searching-edit (get-searching-text)]) (when top-searching-edit (let ([searching-edit (let ([focus-snip (send top-searching-edit get-focus-snip)]) - (if focus-snip + (if (and focus-snip (is-a? focus-snip editor-snip%)) (send focus-snip get-editor) top-searching-edit))]