From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <insight-return-3085-listarch-insight=sourceware.cygnus.com@sources.redhat.com>
Received: (qmail 5947 invoked by alias); 4 Dec 2001 19:36:59 -0000
Mailing-List: contact insight-help@sources.redhat.com; run by ezmlm
Precedence: bulk
List-Subscribe: <mailto:insight-subscribe@sources.redhat.com>
List-Archive: <http://sources.redhat.com/ml/insight/>
List-Post: <mailto:insight@sources.redhat.com>
List-Help: <mailto:insight-help@sources.redhat.com>, <http://sources.redhat.com/ml/#faqs>
Sender: insight-owner@sources.redhat.com
Received: (qmail 5915 invoked from network); 4 Dec 2001 19:36:56 -0000
X-Authentication-Warning: makita.cygnus.com: keiths owned process doing -bs
Date: Mon, 08 Oct 2001 01:27:00 -0000
From: Keith Seitz <keiths@cygnus.com>
To: Tom Tromey <tromey@redhat.com>
cc: Insight List <insight@sourceware.cygnus.com>
Subject: Re: feature suggestion
In-Reply-To: <87adwz367n.fsf@creche.redhat.com>
Message-ID: <Pine.GSO.4.33.0112041135120.18-100000@makita.cygnus.com>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
X-SW-Source: 2001-q4/txt/msg00082.txt.bz2

On 3 Dec 2001, Tom Tromey wrote:

> It would be helpful to me if the (mouse) cursor changed to a watch
> over the console window when the inferior is executing.

Try this patch. If it works, I'll check something in.

Keith

Index: library/console.itb
===================================================================
RCS file: /cvs/src/src/gdb/gdbtk/library/console.itb,v
retrieving revision 1.14
diff -u -p -r1.14 console.itb
--- library/console.itb	2001/10/17 20:30:29	1.14
+++ library/console.itb	2001/12/04 19:36:22
@@ -205,6 +205,7 @@ body Console::_build_win {} {

 body Console::idle {event} {
   set _running 0
+  $_top configure -cursor {}
 }

 # ------------------------------------------------------------------
@@ -212,6 +213,7 @@ body Console::idle {event} {
 # ------------------------------------------------------------------
 body Console::busy {event} {
   set _running 1
+  $_top configure -cursor watch
 }

 # ------------------------------------------------------------------

From mboxrd@z Thu Jan  1 00:00:00 1970
From: Keith Seitz <keiths@cygnus.com>
To: Tom Tromey <tromey@redhat.com>
Cc: Insight List <insight@sourceware.cygnus.com>
Subject: Re: feature suggestion
Date: Tue, 04 Dec 2001 11:36:00 -0000
Message-ID: <Pine.GSO.4.33.0112041135120.18-100000@makita.cygnus.com>
References: <87adwz367n.fsf@creche.redhat.com>
X-SW-Source: 2001-q4/msg00383.html
Message-ID: <20011204113600.YdhGcqdYnNsE5V3wK2bqGawulezdTn338nbRxG58G3A@z>

On 3 Dec 2001, Tom Tromey wrote:

> It would be helpful to me if the (mouse) cursor changed to a watch
> over the console window when the inferior is executing.

Try this patch. If it works, I'll check something in.

Keith

Index: library/console.itb
===================================================================
RCS file: /cvs/src/src/gdb/gdbtk/library/console.itb,v
retrieving revision 1.14
diff -u -p -r1.14 console.itb
--- library/console.itb	2001/10/17 20:30:29	1.14
+++ library/console.itb	2001/12/04 19:36:22
@@ -205,6 +205,7 @@ body Console::_build_win {} {

 body Console::idle {event} {
   set _running 0
+  $_top configure -cursor {}
 }

 # ------------------------------------------------------------------
@@ -212,6 +213,7 @@ body Console::idle {event} {
 # ------------------------------------------------------------------
 body Console::busy {event} {
   set _running 1
+  $_top configure -cursor watch
 }

 # ------------------------------------------------------------------