From 4af100ae51803d44af9d7e52da4f9454b4721715 Mon Sep 17 00:00:00 2001
From: Hans-Christoph Steiner <eighthave@users.sourceforge.net>
Date: Tue, 6 Mar 2012 15:31:25 +0000
Subject: use pdsend proc to support Pd >= 0.43

svn path=/trunk/externals/unauthorized/; revision=16049
---
 pianoroll.tcl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'pianoroll.tcl')

diff --git a/pianoroll.tcl b/pianoroll.tcl
index eccadce..b3bec53 100644
--- a/pianoroll.tcl
+++ b/pianoroll.tcl
@@ -34,13 +34,13 @@ proc pianoroll_apply {id} {
          [eval concat $$var_graph_defvalue] \
          [eval concat $$var_graph_save] \;]
      #puts stderr $cmd
-     pd $cmd
+     pdsend $cmd
 }
  
 proc pianoroll_cancel {id} {
      set cmd [concat $id cancel \;]
      #puts stderr $cmd
-     pd $cmd
+     pdsend $cmd
 }
  
 proc pianoroll_ok {id} {
-- 
cgit v1.2.1