use 0.43's pdsend command in place of <0.43's pd

svn path=/trunk/externals/loaders/tclpd/; revision=15574

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"
 }