public inbox for insight@sourceware.org
 help / color / mirror / Atom feed
From: James Ingham <jingham@cygnus.com>
To: MichalKang@aol.com
Cc: insight@sourceware.cygnus.com
Subject: Re: Insight Question
Date: Thu, 28 Oct 1999 10:12:00 -0000	[thread overview]
Message-ID: <14360.33906.210765.72522@leda.cygnus.com> (raw)
In-Reply-To: <0.bcf2782d.2549d1ca@aol.com>

Michal,

Unfortunately, the answer here is "hack it in...".  We intend to
expand the preferences panels to contain more features of the
debugger, things like text & background colors on the aesthetic side,
and all the nifty settings in gdb on the functional side, but haven't
yet gotten around to it.

Here's how you would go about it.  The text pane background color is
set in gdb/gdbtcl2/srctextwin.itb in the build_win method.  Look at:

  set twinp [iwidgets::scrolledtext $pane1.st -textbackground white \
	       -hscrollmode dynamic -vscrollmode dynamic]

So if you just want to hard code the color, you can just change white
to something else...

If you want to go further, try adding a preference for this, and
another button to the Source preferences panel to set this.  This is
pretty easy to do.

First, you will have to add a preference to the gdbtk preference set.
You do this in prefs.tcl in the prefs_set_default proc, by adding
something like

  pref define gdb/src/text_bg              orange

except you probably don't want orange - but it is almost Halloween...

Then add another button to the Source Preferences panel.  Do this in
the build_win method of srcpref.itb.  You can pretty much cut & paste
the code from the other buttons.

Then change the srctextwin.itb code to:

  set twinp [iwidgets::scrolledtext $pane1.st \
               -textbackground [pref get gdb/src/text_bg] \
	       -hscrollmode dynamic -vscrollmode dynamic]

and you are done.  If you hack all this in, send me the diffs, and I
will happily incorporate them.

Hope this helps.

Jim

 > Hello,
 > 
 > How do I change the default background color of white to something less 
 > stressing to the eyes?
 > 
 > Thank you,
 > Michael Kang.
 > 

-- 
++==++==++==++==++==++==++==++==++==++==++==++==++==++==++==++==++==++==++
Jim Ingham                                              jingham@cygnus.com
Cygnus Solutions Inc.

  reply	other threads:[~1999-10-28 10:12 UTC|newest]

Thread overview: 4+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
1999-10-28  9:21 MichalKang
1999-10-28 10:12 ` James Ingham [this message]
2006-03-02 22:09 Jason.Binger
2006-03-09 15:18 ` Keith Seitz

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=14360.33906.210765.72522@leda.cygnus.com \
    --to=jingham@cygnus.com \
    --cc=MichalKang@aol.com \
    --cc=insight@sourceware.cygnus.com \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).