diff options
| author | lecoanet | 2006-10-18 11:58:23 +0000 |
|---|---|---|
| committer | lecoanet | 2006-10-18 11:58:23 +0000 |
| commit | 6e61e370c79d480bb09bc7db09ada9870a50babd (patch) | |
| tree | 0b276b25a08827ec337feed12499e488b4fcc64f /demos/photoAlpha.tcl | |
| parent | b8ec5181d306d1fb3654108f0df41280b7047ab3 (diff) | |
| download | tkzinc-6e61e370c79d480bb09bc7db09ada9870a50babd.zip tkzinc-6e61e370c79d480bb09bc7db09ada9870a50babd.tar.gz tkzinc-6e61e370c79d480bb09bc7db09ada9870a50babd.tar.bz2 tkzinc-6e61e370c79d480bb09bc7db09ada9870a50babd.tar.xz | |
Restored the tiling of the background on all platforms.
Diffstat (limited to 'demos/photoAlpha.tcl')
| -rw-r--r-- | demos/photoAlpha.tcl | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/demos/photoAlpha.tcl b/demos/photoAlpha.tcl index e3d41d6..764baca 100644 --- a/demos/photoAlpha.tcl +++ b/demos/photoAlpha.tcl @@ -43,13 +43,8 @@ namespace eval photoAlpha { ########################################### # Zinc ########################################## - if { $tcl_platform(platform) eq "unix" } { - zinc $w.zinc -width 350 -height 250 -render 1 -font $defaultfont \ + zinc $w.zinc -width 350 -height 250 -render 1 -font $defaultfont \ -borderwidth 3 -relief sunken -tile $texture - } else { - zinc $w.zinc -width 350 -height 250 -render 1 -font $defaultfont \ - -borderwidth 3 -relief sunken -backcolor \#898A8F - } grid $w.zinc -row 1 -column 0 -columnspan 2 -sticky news grid columnconfigure $w 0 -weight 1 grid columnconfigure $w 1 -weight 1 |