diff options
Diffstat (limited to 'demos/colorX.tcl')
-rw-r--r-- | demos/colorX.tcl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/demos/colorX.tcl b/demos/colorX.tcl index 87a78b8..c93ba35 100644 --- a/demos/colorX.tcl +++ b/demos/colorX.tcl @@ -17,7 +17,8 @@ button $w.buttons.dismiss -text Dismiss -command "destroy $w" button $w.buttons.code -text "See Code" -command "showCode $w" pack $w.buttons.dismiss $w.buttons.code -side left -expand 1 -set defaultfont "-adobe-helvetica-bold-r-normal-*-120-*-*-*-*-*-*" +set defaultfont [font create -family Helvetica -size 10 -weight bold] + zinc $w.zinc -width 700 -height 600 -borderwidth 3 -relief sunken -render 1 pack $w.zinc |