From fe669ce208870caf72df127b1cca6f16d5bc1b4a Mon Sep 17 00:00:00 2001
From: hobbs <hobbs>
Date: Fri, 30 Mar 2001 07:04:58 +0000
Subject: 	* library/bgerror.tcl (bgerror): allow focus into details
 window 	for Windows C&P to work. [Bug #220929]

---
 library/bgerror.tcl | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/library/bgerror.tcl b/library/bgerror.tcl
index c2fd1df..51a9be3 100644
--- a/library/bgerror.tcl
+++ b/library/bgerror.tcl
@@ -9,8 +9,8 @@
 # Copyright (c) 1998-2000 by Ajuba Solutions.
 # All rights reserved.
 # 
-# RCS: @(#) $Id: bgerror.tcl,v 1.13 2000/07/17 21:07:54 ericm Exp $
-# $Id: bgerror.tcl,v 1.13 2000/07/17 21:07:54 ericm Exp $
+# RCS: @(#) $Id: bgerror.tcl,v 1.14 2001/03/30 07:04:58 hobbs Exp $
+# $Id: bgerror.tcl,v 1.14 2001/03/30 07:04:58 hobbs Exp $
 
 option add *ErrorDialog.function.text [::msgcat::mc "Save To Log"] \
 	widgetDefault
@@ -172,6 +172,7 @@ proc bgerror err {
     pack $W.text -side left -expand yes -fill both
     $W.text insert 0.0 "$err\n$info"
     $W.text mark set insert 0.0
+    bind $W.text <ButtonPress-1> { focus %W }
     $W.text configure -state disabled
 
     # 2. Fill the top part with bitmap and message
-- 
cgit v0.12