diff options
author | treectrl <treectrl> | 2005-05-30 19:35:10 (GMT) |
---|---|---|
committer | treectrl <treectrl> | 2005-05-30 19:35:10 (GMT) |
commit | dfc8041cb28b35e3ea5b274a8ec7969174a07981 (patch) | |
tree | 79baf2e2e52f905d9b5bc9d91323f25ae4bfe7b5 /demos/demo.tcl | |
parent | 57ee7d0a976f784c4e62137399624cd2ac8b53db (diff) | |
download | tktreectrl-dfc8041cb28b35e3ea5b274a8ec7969174a07981.zip tktreectrl-dfc8041cb28b35e3ea5b274a8ec7969174a07981.tar.gz tktreectrl-dfc8041cb28b35e3ea5b274a8ec7969174a07981.tar.bz2 |
Check for existence of env(TREECTRL_LIBRARY) when reporting its value.
Diffstat (limited to 'demos/demo.tcl')
-rw-r--r-- | demos/demo.tcl | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/demos/demo.tcl b/demos/demo.tcl index ab64c43..1b1fce6 100644 --- a/demos/demo.tcl +++ b/demos/demo.tcl @@ -113,7 +113,12 @@ foreach list [info loaded] { puts "demo.tcl: using '$file'" break } -puts "demo.tcl: TREECTRL_LIBRARY=$env(TREECTRL_LIBRARY)" +if {[info exists env(TREECTRL_LIBRARY)]} { + puts "demo.tcl: TREECTRL_LIBRARY=$env(TREECTRL_LIBRARY)" +} else { + puts "demo.tcl: TREECTRL_LIBRARY undefined" +} +puts "demo.tcl: treectrl_library=$treectrl_library" option add *TreeCtrl.useTheme 1 #option add *TreeCtrl.itemPrefix item |