version 1.15, 2007/04/03 20:10:41
|
version 1.16, 2008/09/14 15:16:30
|
Line 203 sub SurveyProblemSelector {
|
Line 203 sub SurveyProblemSelector {
|
if ($env{'form.problemchoice'} eq $value) { |
if ($env{'form.problemchoice'} eq $value) { |
$checked = 'checked '; |
$checked = 'checked '; |
} |
} |
my $link = $problem->{'res'}->src. |
my $link = $problem->{'res'}->link. |
'?symb='.&escape($problem->{'res'}->symb); |
'?symb='.&escape($problem->{'res'}->shown_symb); |
$Str .= '<tr><td>'. |
$Str .= '<tr><td>'. |
'<input type="radio" name="problemchoice" id="'.$id.'" '. |
'<input type="radio" name="problemchoice" id="'.$id.'" '. |
'value="'.$value.'" '.$checked.'/>'.'</td>'. |
'value="'.$value.'" '.$checked.'/>'.'</td>'. |