suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix problem with radio buttons under X11

Browse Source 
Closes PR 10951
 Marge to 5.0.1
(cherry picked from commit 167d048773)
This commit is contained in:
Matthew Flatt 2010-07-20 10:18:06 -06:00 committed by Eli Barzilay
parent 6af6bd5898
commit 4f71242c66
3 changed files with 4 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/wxxt/src/XWidgets/xwGroup.c
View File

@ -155,12 +155,11 @@ static void off_cb(toggle,client_data,call_data)Widget toggle;XtPointer client
Cardinal bits = sizeof(((XfwfGroupWidget)self)->xfwfGroup.selection) * 8;
switch (((XfwfGroupWidget)self)->xfwfGroup.selectionStyle) {
case XfwfSingleSelection:
/* $selection = -1L; break; */ /* Allows nothing selected - disabled */
case XfwfOneSelection:
XtVaSetValues(toggle, XtNon, True, NULL); /* Undo */
break;
case XfwfSingleSelection:
((XfwfGroupWidget)self)->xfwfGroup.selection = -1L; /* Nothing selected */
break;
case XfwfMultipleSelection:
if (toggle_ord < bits) ((XfwfGroupWidget)self)->xfwfGroup.selection &= ~(1L << toggle_ord);
break;

5
src/wxxt/src/XWidgets/xwGroup.w
View File

@ -327,12 +327,11 @@ be turned off, except by turning on another one.
Cardinal bits = sizeof($selection) * 8;
switch ($selectionStyle) {
case XfwfSingleSelection:
/* $selection = -1L; break; */ /* Allows nothing selected - disabled */
case XfwfOneSelection:
XtVaSetValues(toggle, XtNon, True, NULL); /* Undo */
break;
case XfwfSingleSelection:
$selection = -1L; /* Nothing selected */
break;
case XfwfMultipleSelection:
if (toggle_ord < bits) $selection &= ~(1L << toggle_ord);
break;

1
src/wxxt/src/XWidgets/xwGroupP.h
View File

@ -5,7 +5,6 @@
#define ___XWGROUPP_H
#include <./xwRowColP.h>
#include <./xwGroup.h>
#include <stdint.h>
_XFUNCPROTOBEGIN
typedef struct {