index 68cd1a1fc51379f8e4995ebf408d229adce6088d..22270ce46bb73bc8fc8e82409ef0179576f7ba20 100755 (executable)
--- a/gitk
+++ b/gitk
if {$fontparam(slant) eq "italic"} {
lappend fontpref($f) "italic"
}
- set w $prefstop.$f
+ set w $prefstop.notebook.fonts.$f
$w conf -text $fontparam(family) -font $fontpref($f)
fontcan