From: Gerrit Pape <pape@smarden.org>
Date: Wed, 9 Jan 2008 03:19:47 +0000 (+1100)
Subject: [PATCH] gitk: use user-configured background in view definition dialog
X-Git-Tag: v1.5.4-rc3~4^2~3
X-Git-Url: http://git.tremily.us/?a=commitdiff_plain;h=f0c842681936ffd684aac3f0d8340c99780d5b53;p=git.git

[PATCH] gitk: use user-configured background in view definition dialog

Have the text fields in the view definition dialog (View->New view...)
use the background color as configured through the preferences, instead
of hard-coded 'white'.

This was suggested by Paul Wise through http://bugs.debian.org/457124

Signed-off-by: Gerrit Pape <pape@smarden.org>
Signed-off-by: Paul Mackerras <paulus@samba.org>
---

diff --git a/gitk b/gitk
index 4a923afdf..801a5a9d8 100755
--- a/gitk
+++ b/gitk
@@ -1875,7 +1875,7 @@ proc editview {} {
 }
 
 proc vieweditor {top n title} {
-    global newviewname newviewperm viewfiles
+    global newviewname newviewperm viewfiles bgcolor
 
     toplevel $top
     wm title $top $title
@@ -1889,12 +1889,12 @@ proc vieweditor {top n title} {
 	-text [mc "Commits to include (arguments to git rev-list):"]
     grid $top.al - -sticky w -pady 5
     entry $top.args -width 50 -textvariable newviewargs($n) \
-	-background white
+	-background $bgcolor
     grid $top.args - -sticky ew -padx 5
     message $top.l -aspect 1000 \
 	-text [mc "Enter files and directories to include, one per line:"]
     grid $top.l - -sticky w
-    text $top.t -width 40 -height 10 -background white -font uifont
+    text $top.t -width 40 -height 10 -background $bgcolor -font uifont
     if {[info exists viewfiles($n)]} {
 	foreach f $viewfiles($n) {
 	    $top.t insert end $f