Update of /cvsroot/pure-data/externals/miXed/test/toxy In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv10934/test/toxy
Modified Files: setup.wid Log Message: various bug-fixes, maxmode, toxy .#args
Index: setup.wid =================================================================== RCS file: /cvsroot/pure-data/externals/miXed/test/toxy/setup.wid,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** setup.wid 23 Mar 2004 12:07:22 -0000 1.3 --- setup.wid 8 Dec 2004 15:40:14 -0000 1.4 *************** *** 117,134 **** }
! if {[info exists ::toxy::masterinits]} { ! set failed [catch {eval $::toxy::masterinits} res] ! unset ::toxy::masterinits ! if {$failed} { error [concat in ::toxy::masterinits: $res] } } ! if {[info exists ::toxy::typeinits]} { ! set failed [catch {eval $::toxy::typeinits} res] ! unset ::toxy::typeinits ! if {$failed} { error [concat in ::toxy::typeinits: $res] } } ! if {[info exists ::toxy::iteminits]} { ! set failed [catch {eval $::toxy::iteminits} res] ! unset ::toxy::iteminits ! if {$failed} { error [concat in ::toxy::iteminits: $res] } }
--- 117,134 ---- }
! if {[info exists ::toxy::masterinit]} { ! set failed [catch {eval $::toxy::masterinit} res] ! unset ::toxy::masterinit ! if {$failed} { error [concat in ::toxy::masterinit: $res] } } ! if {[info exists ::toxy::typeinit]} { ! set failed [catch {eval $::toxy::typeinit} res] ! unset ::toxy::typeinit ! if {$failed} { error [concat in ::toxy::typeinit: $res] } } ! if {[info exists ::toxy::iteminit]} { ! set failed [catch {eval $::toxy::iteminit} res] ! unset ::toxy::iteminit ! if {$failed} { error [concat in ::toxy::iteminit: $res] } }
*************** *** 205,209 **** # FIXME proc ::toxy::scale_command {target sel v} { ! pd [concat $target $sel $v ;] }
--- 205,217 ---- # FIXME proc ::toxy::scale_command {target sel v} { ! if {$::toxy::scale_isactive} { ! pd [concat $target $sel $v ;] ! } ! set ::toxy::scale_isactive 1 ! } ! ! proc ::toxy::scale_doset {path v} { ! set ::toxy::scale_isactive 0 ! $path set $v }
*************** *** 240,243 **** --- 248,254 ---- ::toxy::master .- .- .^.c .|
+ # FIXME + set ::toxy::scale_isactive 1 + # standard widget types
*************** *** 251,254 **** --- 262,266 ---- #. -bg pink -activebackground red -length 200 #. @float .- set .#1 + #. @vset ::toxy::scale_doset .- .#1
#> symbol entry