diff options
| author | Hans-Christoph Steiner <eighthave@users.sourceforge.net> | 2012-03-06 15:31:25 +0000 |
|---|---|---|
| committer | IOhannes m zmölnig <zmoelnig@iem.at> | 2015-10-14 15:23:30 +0200 |
| commit | 4af100ae51803d44af9d7e52da4f9454b4721715 (patch) | |
| tree | 5b0fa834af8eee760993b81ea59dd37c146edc3f | |
| parent | 02492105462a34bde7b607802873cd52d1e3a1f4 (diff) | |
use pdsend proc to support Pd >= 0.43
svn path=/trunk/externals/unauthorized/; revision=16049
| -rw-r--r-- | audience~.tcl | 4 | ||||
| -rw-r--r-- | cooled~.tcl | 4 | ||||
| -rw-r--r-- | exciter.tcl | 4 | ||||
| -rw-r--r-- | filterbank~.tcl | 4 | ||||
| -rw-r--r-- | grid.tcl | 4 | ||||
| -rw-r--r-- | pianoroll.tcl | 4 | ||||
| -rw-r--r-- | playlist.tcl | 4 | ||||
| -rw-r--r-- | probalizer.tcl | 4 | ||||
| -rw-r--r-- | scratcher~.tcl | 4 | ||||
| -rw-r--r-- | scrolllist.tcl | 4 |
10 files changed, 20 insertions, 20 deletions
diff --git a/audience~.tcl b/audience~.tcl index fcf7458..49ea0bd 100644 --- a/audience~.tcl +++ b/audience~.tcl @@ -17,13 +17,13 @@ proc audience_apply {id} { [eval concat $$var_graph_nboutputs] \ \;] #puts stderr $cmd - pd $cmd + pdsend $cmd } proc audience_cancel {id} { set cmd [concat $id cancel \;] #puts stderr $cmd - pd $cmd + pdsend $cmd } proc audience_ok {id} { diff --git a/cooled~.tcl b/cooled~.tcl index ebd7699..5965164 100644 --- a/cooled~.tcl +++ b/cooled~.tcl @@ -17,13 +17,13 @@ proc cooled_apply {id} { [eval concat $$var_graph_draw] \ \;] #puts stderr $cmd - pd $cmd + pdsend $cmd } proc cooled_cancel {id} { set cmd [concat $id cancel \;] #puts stderr $cmd - pd $cmd + pdsend $cmd } proc cooled_ok {id} { diff --git a/exciter.tcl b/exciter.tcl index c0280e6..11b94e4 100644 --- a/exciter.tcl +++ b/exciter.tcl @@ -25,13 +25,13 @@ proc exciter_apply {id} { [eval concat $$var_graph_loop] \ [eval concat $$var_graph_save] \;] #puts stderr $cmd - pd $cmd + pdsend $cmd } proc exciter_cancel {id} { set cmd [concat $id cancel \;] #puts stderr $cmd - pd $cmd + pdsend $cmd } proc exciter_ok {id} { diff --git a/filterbank~.tcl b/filterbank~.tcl index 4143802..4e0e75e 100644 --- a/filterbank~.tcl +++ b/filterbank~.tcl @@ -14,13 +14,13 @@ proc filterbank_apply {id} { [eval concat $$var_graph_highfreq] \ \;] #puts stderr $cmd - pd $cmd + pdsend $cmd } proc filterbank_cancel {id} { set cmd [concat $id cancel \;] #puts stderr $cmd - pd $cmd + pdsend $cmd } proc filterbank_ok {id} { @@ -44,13 +44,13 @@ proc grid_apply {id} { [eval concat $$var_graph_ylines] \ \;] #puts stderr $cmd - pd $cmd + pdsend $cmd } proc grid_cancel {id} { set cmd [concat $id cancel \;] #puts stderr $cmd - pd $cmd + pdsend $cmd } proc grid_ok {id} { 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} { diff --git a/playlist.tcl b/playlist.tcl index 5a22a05..a4ce6b5 100644 --- a/playlist.tcl +++ b/playlist.tcl @@ -32,13 +32,13 @@ proc playlist_apply {id} { [eval concat $$var_graph_secolor] \ \;] #puts stderr $cmd - pd $cmd + pdsend $cmd } proc playlist_cancel {id} { set cmd [concat $id cancel \;] #puts stderr $cmd - pd $cmd + pdsend $cmd } proc playlist_ok {id} { diff --git a/probalizer.tcl b/probalizer.tcl index 2f069e9..bee7d26 100644 --- a/probalizer.tcl +++ b/probalizer.tcl @@ -22,13 +22,13 @@ proc probalizer_apply {id} { [eval concat $$var_graph_noccurrences] \ [eval concat $$var_graph_save] \;] #puts stderr $cmd - pd $cmd + pdsend $cmd } proc probalizer_cancel {id} { set cmd [concat $id cancel \;] #puts stderr $cmd - pd $cmd + pdsend $cmd } proc probalizer_ok {id} { diff --git a/scratcher~.tcl b/scratcher~.tcl index bc8ad6f..34f1909 100644 --- a/scratcher~.tcl +++ b/scratcher~.tcl @@ -14,13 +14,13 @@ proc scratcher_apply {id} { [eval concat $$var_graph_height] \ \;] #puts stderr $cmd - pd $cmd + pdsend $cmd } proc scratcher_cancel {id} { set cmd [concat $id cancel \;] #puts stderr $cmd - pd $cmd + pdsend $cmd } proc scratcher_ok {id} { diff --git a/scrolllist.tcl b/scrolllist.tcl index 79ca61c..b971cf3 100644 --- a/scrolllist.tcl +++ b/scrolllist.tcl @@ -29,13 +29,13 @@ proc scrolllist_apply {id} { [eval concat $$var_graph_secolor] \ \;] #puts stderr $cmd - pd $cmd + pdsend $cmd } proc scrolllist_cancel {id} { set cmd [concat $id cancel \;] #puts stderr $cmd - pd $cmd + pdsend $cmd } proc scrolllist_ok {id} { |