{"thread":{"id":"7405","subject":"[PATCH 3/5] Chase remaining default font errors in the gitk dialogs.","startedAt":"2007-03-26T07:38:34Z","lastAt":"2007-03-26T07:38:34Z","messageCount":1,"participants":["Eygene Ryabinkin"],"isPatch":true,"patchVersion":1,"patchTotal":5},"messages":[{"id":"38002","messageId":"20070326073834.GG44578@codelabs.ru","threadId":"7405","inReplyTo":null,"subject":"[PATCH 3/5] Chase remaining default font errors in the gitk dialogs.","fromName":"Eygene Ryabinkin","fromEmail":"rea-git@codelabs.ru","sentAt":"2007-03-26T07:38:34Z","receivedAt":"2007-03-26T07:38:34Z","isPatch":true,"sender":{"key":"rea-git@codelabs.ru","avatar":null},"body":"The dialog activated by the \"View/New view...\" menu entry was fixed\nto respect the default UI font for its elements.\n\nSigned-off-by: Eygene Ryabinkin <rea-git@codelabs.ru>\n---\n gitk |   15 +++++++++------\n 1 files changed, 9 insertions(+), 6 deletions(-)\n\ndiff --git a/gitk b/gitk\nindex e4d3bf4..f54ff27 100755\n--- a/gitk\n+++ b/gitk\n@@ -1465,20 +1465,21 @@ proc vieweditor {top n title} {\n     toplevel $top\n     wm title $top $title\n     label $top.nl -text \"Name\" -font $uifont\n-    entry $top.name -width 20 -textvariable newviewname($n)\n+    entry $top.name -width 20 -textvariable newviewname($n) -font $uifont\n     grid $top.nl $top.name -sticky w -pady 5\n-    checkbutton $top.perm -text \"Remember this view\" -variable newviewperm($n)\n+    checkbutton $top.perm -text \"Remember this view\" -variable newviewperm($n) \\\n+\t-font $uifont\n     grid $top.perm - -pady 5 -sticky w\n     message $top.al -aspect 1000 -font $uifont \\\n \t-text \"Commits to include (arguments to git rev-list):\"\n     grid $top.al - -sticky w -pady 5\n     entry $top.args -width 50 -textvariable newviewargs($n) \\\n-\t-background white\n+\t-background white -font $uifont\n     grid $top.args - -sticky ew -padx 5\n     message $top.l -aspect 1000 -font $uifont \\\n \t-text \"Enter files and directories to include, one per line:\"\n     grid $top.l - -sticky w\n-    text $top.t -width 40 -height 10 -background white\n+    text $top.t -width 40 -height 10 -background white -font $uifont\n     if {[info exists viewfiles($n)]} {\n \tforeach f $viewfiles($n) {\n \t    $top.t insert end $f\n@@ -1489,8 +1490,10 @@ proc vieweditor {top n title} {\n     }\n     grid $top.t - -sticky ew -padx 5\n     frame $top.buts\n-    button $top.buts.ok -text \"OK\" -command [list newviewok $top $n]\n-    button $top.buts.can -text \"Cancel\" -command [list destroy $top]\n+    button $top.buts.ok -text \"OK\" -command [list newviewok $top $n] \\\n+\t-font $uifont\n+    button $top.buts.can -text \"Cancel\" -command [list destroy $top] \\\n+\t-font $uifont\n     grid $top.buts.ok $top.buts.can\n     grid columnconfigure $top.buts 0 -weight 1 -uniform a\n     grid columnconfigure $top.buts 1 -weight 1 -uniform a\n-- \n1.5.0.3-dirty\n"}]}