Update of /cvsroot/pure-data/pd/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv855
Modified Files: Tag: desiredata desire.tk Log Message: removed Find menu in main window; fixed [nbx] refresh.
Index: desire.tk =================================================================== RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v retrieving revision 1.1.2.600.2.101 retrieving revision 1.1.2.600.2.102 diff -C2 -d -r1.1.2.600.2.101 -r1.1.2.600.2.102 *** desire.tk 18 Dec 2006 22:30:05 -0000 1.1.2.600.2.101 --- desire.tk 18 Dec 2006 23:54:39 -0000 1.1.2.600.2.102 *************** *** 722,726 **** menu .mbar pack [frame .controls] -side top -fill x ! foreach t {file find window help} { .mbar add cascade -label [say $t] -menu [menu .mbar.$t -tearoff $::pd_tearoff] } --- 722,726 ---- menu .mbar pack [frame .controls] -side top -fill x ! foreach t {file window help} { .mbar add cascade -label [say $t] -menu [menu .mbar.$t -tearoff $::pd_tearoff] } *************** *** 1010,1014 **** audio_on audio_off {} quit} - $self populate_menu find {find find_again find_last_error} $self populate_menu help { about documentation class_browser client_class_tree clipboard_view history_view do_what_i_mean {} --- 1010,1013 ---- *************** *** 1748,1751 **** --- 1747,1755 ---- if {[info exists @find_string]} {$@find_canvas search} } + + def Canvas find_last_error {} { + netsend [list pd finderror] + } + def Canvas bind {eventtype selector args} { set c [$self widget] *************** *** 4907,4910 **** --- 4911,4919 ---- }
+ def NumBox reinit {mess} { + super $mess + set @text $@val + } + def NumBox draw {} { super