From 3c88981ad7f4ffbdf61f5e186e5237320c8acbc9 Mon Sep 17 00:00:00 2001 From: mescalinum Date: Sat, 15 Oct 2011 20:50:44 +0000 Subject: slider2 still can't save send/recvsymbols properly svn path=/trunk/externals/loaders/tclpd/; revision=15606 --- examples/properties.tcl | 2 ++ 1 file changed, 2 insertions(+) (limited to 'examples/properties.tcl') diff --git a/examples/properties.tcl b/examples/properties.tcl index 6579389..dc199de 100644 --- a/examples/properties.tcl +++ b/examples/properties.tcl @@ -9,6 +9,8 @@ proc propertieswindow {gfxstub_id {options {}} {title {}}} { set ::id($win.p) $gfxstub_id set ::optkeys($win.p) [list] foreach {k v} $options { + if {$v eq "empty"} {set v {}} + set v [string map {\\$ $} $v] set ::config($win.p:$k) $v lappend ::optkeys($win.p) $k } -- cgit v1.2.1