--- loncom/interface/statistics/lonsurveyreports.pm 2008/10/30 17:45:25 1.19
+++ loncom/interface/statistics/lonsurveyreports.pm 2008/12/12 05:03:39 1.22
@@ -1,6 +1,6 @@
# The LearningOnline Network with CAPA
#
-# $Id: lonsurveyreports.pm,v 1.19 2008/10/30 17:45:25 bisitz Exp $
+# $Id: lonsurveyreports.pm,v 1.22 2008/12/12 05:03:39 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -211,10 +211,10 @@ sub SurveyProblemSelector {
$Str .= '
'.
''.' | '.
- ''.
+ ''.
''.
(' 'x2).
- ''.&mt('View survey').''.' | |
'.$/;
+ ''.&mt('View survey').''.$/;
}
$Str .= '';
return $Str;
@@ -339,7 +339,7 @@ sub make_text_report {
} else {
$r->print(''
.&mt('There is no essay or string response data to output for this survey.')
- .'');
+ .'
');
}
$r->rflush();
return;
@@ -569,15 +569,20 @@ sub make_HTML_report {
sprintf("%.2f",$count/$total*100).'%'.
&Apache::loncommon::end_data_table_row().$/;
}
- $Str .= &Apache::loncommon::start_data_table_row().
- ''.&mt('Foil Name').' | '.
- ''.&mt('Text').' | '.
- ''.&mt('Freq').' | '.
- ''.&mt('Percent').' | '.
- &Apache::loncommon::end_data_table_row().$/.
- $tmp;
+ $Str.=''
+ .''
+ .&Apache::loncommon::start_data_table()
+ .&Apache::loncommon::start_data_table_header_row()
+ .' | '.&mt('Foil Name').' | '
+ .''.&mt('Text').' | '
+ .''.&mt('Frequency').' | '
+ .''.&mt('Percent').' | '
+ .&Apache::loncommon::end_data_table_header_row().$/
+ .$tmp
+ .&Apache::loncommon::end_data_table()
+ .'
';
}
- $Str.= &Apache::loncommon::end_data_table().'
';
+ $Str.= '';
$r->print($Str);
$r->rflush();
}