aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--examples/properties.tcl4
1 files changed, 2 insertions, 2 deletions
diff --git a/examples/properties.tcl b/examples/properties.tcl
index d225d74..6579389 100644
--- a/examples/properties.tcl
+++ b/examples/properties.tcl
@@ -415,9 +415,9 @@ proc propertiespanel_apply {w} {
lappend newconf $key $v
}
set newconf [string map {$ \\$} $newconf]
- pd [linsert $newconf 0 $::id($w) config]\;
+ pdsend "$::id($w) config $newconf"
}
proc propertiespanel_close {w} {
- pd [concat $::id($w) cancel \;]
+ pdsend "$::id($w) cancel"
}