Update of /cvsroot/pure-data/pd/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv14620
Modified Files: Tag: devel_0_39 desire.tk Log Message: added the starting of a server process. added statusbar (not a cmdline option anymore though) -console now defaults to 1000 more cleanup of code.
Index: desire.tk =================================================================== RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v retrieving revision 1.1.2.27 retrieving revision 1.1.2.28 diff -C2 -d -r1.1.2.27 -r1.1.2.28 *** desire.tk 5 Sep 2005 21:59:15 -0000 1.1.2.27 --- desire.tk 6 Sep 2005 00:47:39 -0000 1.1.2.28 *************** *** 16,22 ****
proc class_new {name body} { - proc ${name}_new {} $body - }
--- 16,20 ---- *************** *** 51,54 **** [...1245 lines suppressed...] ! pack [text $self.entry -width 40 -height 8] -side left -fill x -expand yes ! $self.entry insert 0.0 $text $self.expander configure -image icon_minus -command "listener_unexpand $self" #bind $self.entry <Alt-Return> $@command *************** *** 3520,3526 **** regsub "\n$" $text "" text destroy $self.entry ! entry $self.entry -width 40 $self.entry insert 0 $text - pack $self.entry -side left -fill x -expand yes $self.expander configure -image icon_plus -command "listener_expand $self" bind $self.entry <Up> "listener_up $self" --- 3400,3405 ---- regsub "\n$" $text "" text destroy $self.entry ! pack [entry $self.entry -width 40] -side left -fill x -expand yes $self.entry insert 0 $text $self.expander configure -image icon_plus -command "listener_expand $self" bind $self.entry <Up> "listener_up $self"