** Using WeBWorK **

I noticed some curious (to me) behaviour of
the objects created by parserRadioButtons.pl:
if I specify order then I get spanked for specifying
checked - it looks like I get spanked by the following
clause (in orderedChoices)

Value::Error("Item $i of the 'order' option was already specified.")
if not exists $remainingChoices{$label};

because $label is really "%$label" at this point. (I can
produce the same behaviour if checked is among either
first or last.)

I can work around this by changing the code in the
problem, or I can work around it by replacing the
foregoing clause by

Value::Error("Item $i of the 'last' option was already specified.")
if not (exists $remainingChoices{$label} or exists remainingChoices{"%$label"});
$label = (exists $remainingChoices{"%$label"} ? "%$label" : $label);

(which I'd need to do in three places; one for each of order,
first and last).

Below is a little file that illustrates the behaviour. Is this intended
behaviour?

cheers,
-wb

DOCUMENT();

loadMacros(
'PGstandard.pl',
'MathObjects.pl',
'parserRadioButtons.pl'
);

TEXT(beginproblem());

$radio = RadioButtons([
'This is the first choice.',
'This is the second choice.',
'This is the third choice.',
'This is the fourth choice.',
'This is the fifth choice.'], 4,
labels => [1, 2, 3, 4, 5],
#labels => "123",
order => [1, 2, 3, 4, 5],
#order => [0, 1, 2, 3, 4],
checked => '1'
);

BEGIN_TEXT
Select one of the following.
(Just click on 'Submit Answers' if
your choice is already selected.)
$PAR
\{ $radio->buttons \}
END_TEXT

ANS($radio->cmp);

ENDDOCUMENT;