Update of /cvsroot/pure-data/pd/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv31774
Modified Files: Tag: desiredata desire.tk Log Message: steady, is_log, isa and fstyle works agian with IEMPropertiesDialog
Index: desire.tk =================================================================== RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v retrieving revision 1.1.2.600.2.41 retrieving revision 1.1.2.600.2.42 diff -C2 -d -r1.1.2.600.2.41 -r1.1.2.600.2.42 *** desire.tk 7 Dec 2006 23:40:24 -0000 1.1.2.600.2.41 --- desire.tk 8 Dec 2006 02:41:36 -0000 1.1.2.600.2.42 *************** *** 4521,4525 **** set tosend {} foreach v $args {switch -- $v {{} {set v "empty"}}; lappend props $v} ! eval [concat [list pd .$self reload] $props] }
--- 4521,4525 ---- set tosend {} foreach v $args {switch -- $v {{} {set v "empty"}}; lappend props $v} ! eval [concat [list netsend [concat [list .$self reload] $props]]] }
*************** *** 4581,4584 **** --- 4581,4588 ---- }]] $self add .$self $d + set textvar ${prop}2 + if {$prop == "steady" || $prop == "is_log" || $prop == "isa" || $prop == "fstyle"} { + set @$textvar [say [lindex [lindex $d end] $@$prop]] + } } } *************** *** 6128,6132 **** pack $f.label $f.butt -side left bind $f.butt <1> [list $self dropmenu_open $f $name $part] - }
--- 6132,6135 ---- *************** *** 6913,6917 **** super $frame $var $part $val $say } ! def ServerPrefsDialog dropmenu_open {f name part} { global pd_apilist pd_apilist2 _ --- 6916,6920 ---- super $frame $var $part $val $say } ! #used by choice and devlist def ServerPrefsDialog dropmenu_open {f name part} { global pd_apilist pd_apilist2 _ *************** *** 6929,6932 **** --- 6932,6937 ---- }
+ def IEMPropertiesDialog dropmenu_open {f name part} {super $f} + #################### ClientPrefsDialog set ddrc_options {