[BioC] widgetTools library, checkButton function

[Tom Price]

In my R 1.8.1 version, there is a display problem with having multiple
checkButtons in a widget. Checking one of the upper checkboxes changes the
displayed value for one of the lower checkboxes at the same time, although
the output values are correct. 

E <- new.env( hash= T, parent= parent.frame( 1 ) )
check1 <- checkButton( wName= "check1", wValue= c( burger=T, fries= T ),
wEnv= E )
check2 <- checkButton( wName= "check2", wValue= c( coke= T, fanta= T ),
wEnv= E )
w <- widget( "This fails", list( food= list( check1= check1 ),
    drink= list( check2= check2 ) ), env= E )
( food <- w at pWidgets$food$check1 at wValue )
( drink <- w at pWidgets$drink$check2 at wValue )

Try selecting burger, fries and coke but not fanta. Can anyone suggest a
solution?

Tom Price
Wellcome Trust Centre for Human Genetics
Oxford
www.well.ox.ac.uk/~tprice
Telephone: 01865 287 608
-------------- next part --------------
A non-text attachment was scrubbed...
Name: winmail.dat
Type: application/ms-tnef
Size: 3716 bytes
Desc: not available
Url : https://www.stat.math.ethz.ch/pipermail/bioconductor/attachments/20040210/be979d2a/winmail-0001.bin