From 5cc459c9d6af72783f9d9febee9d3a8129bcfd35 Mon Sep 17 00:00:00 2001 From: lecoanet Date: Mon, 31 Mar 2003 15:56:01 +0000 Subject: Ajourt de script et petites corrections --- demos/tkZincLogo.tcl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'demos/tkZincLogo.tcl') diff --git a/demos/tkZincLogo.tcl b/demos/tkZincLogo.tcl index 2e72f36..96891f3 100644 --- a/demos/tkZincLogo.tcl +++ b/demos/tkZincLogo.tcl @@ -13,11 +13,11 @@ if {![info exists zincDemo]} { package require zincLogo -set w .zincLogo +set w .tkZincLogo catch {destroy $w} toplevel $w wm title $w "Zinc logo Demonstration" -wm iconname $w zincLogo +wm iconname $w tkZincLogo set defaultfont "-adobe-helvetica-bold-r-normal-*-120-*-*-*-*-*-*" -- cgit v1.1