loncom/interface/statistics/lonsurveyreports.pm - diff

Return to lonsurveyreports.pm CVS log

Up to [LON-CAPA] / loncom / interface / statistics

version 1.8, 2005/04/07 06:56:24	version 1.10, 2006/02/14 15:44:25
Line 206 sub SurveyProblemSelector {	Line 206 sub SurveyProblemSelector {
'<input type="radio" name="problemchoice" id="'.$id.'" '.	'<input type="radio" name="problemchoice" id="'.$id.'" '.
'value="'.$value.'" '.$checked.'/>'.'</td>'.	'value="'.$value.'" '.$checked.'/>'.'</td>'.
'<td><nobr>'.	'<td><nobr>'.
'<label for="'.$id.'">'.$problem->{'res'}->compTitle.'('.$problem->{'seq'}->compTitle.')'.'</lablel>'.	'<label for="'.$id.'">'.$problem->{'res'}->compTitle.'('.$problem->{'seq'}->compTitle.')'.'</label>'.
(' 'x2).	(' 'x2).
qq{<a target="preview" href="$link">view</a>}.'</td></tr>'.$/;	qq{<a target="preview" href="$link">view</a>}.'</td></tr>'.$/;
}	}
Line 483 sub make_HTML_report {	Line 483 sub make_HTML_report {
$Str .= '<tr>'.	$Str .= '<tr>'.
'<td><b>'.&mt('Total').'</b></td>'.	'<td><b>'.&mt('Total').'</b></td>'.
'<td>'.$data->{'_count'}.'</td>'.	'<td>'.$data->{'_count'}.'</td>'.
'<td>'.&mt('Part [_1], Response [_2]',$partid,$respid).'</td>'.	'<td>'.&mt('Part [_1], Response [_2]',
	$resource->part_display($partid),$respid).'</td>'.
'</tr>';	'</tr>';
if (exists($data->{'responses'}) &&	if (exists($data->{'responses'}) &&
ref($data->{'responses'}) eq 'ARRAY') {	ref($data->{'responses'}) eq 'ARRAY') {