pd/src desire.tk,1.1.2.42,1.1.2.43 - Pd-cvs

13 Sep 2005


      Update of /cvsroot/pure-data/pd/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv1861
Modified Files:
      Tag: devel_0_39
    desire.tk 
Log Message:
commented out the useless puts
Index: desire.tk
===================================================================
RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v
retrieving revision 1.1.2.42
retrieving revision 1.1.2.43
diff -C2 -d -r1.1.2.42 -r1.1.2.43
*** desire.tk	13 Sep 2005 09:08:23 -0000	1.1.2.42
--- desire.tk	13 Sep 2005 09:32:16 -0000	1.1.2.43
***************
*** 209,213 ****
proc pdtk_pd_meters {indb outdb inclip outclip} {
!     puts "pdtk_pd_meters::: $indb $outdb $inclip $outclip"
.controls.in.1.mtr coords m 0 0 $indb 0
--- 209,213 ----
proc pdtk_pd_meters {indb outdb inclip outclip} {
!     #puts "pdtk_pd_meters::: $indb $outdb $inclip $outclip"
[...1202 lines suppressed...]
  # real classes
--- 2423,2427 ----
  set fields1 {foo bar x1 y1 class}
  set fields2 {snd rcv lab ldx ldy fstyle fs bcol fcol lcol}
!
# real classes
***************
*** 2915,2919 ****
    set canvas $_(focus)
    set bang_id [format %x [expr 0x81168b0 - $offset]]
! 	puts "new object id -> $bang_id"
set _($bang_id:w) 15
--- 2915,2919 ----
    set canvas $_(focus)
    set bang_id [format %x [expr 0x81168b0 - $offset]]
! 	#puts "new object id -> $bang_id"
set _($bang_id:w) 15