[LON-CAPA-cvs] cvs: loncom /interface/statistics lonsurveyreports.pm
matthew
lon-capa-cvs@mail.lon-capa.org
Tue, 06 Jul 2004 15:56:42 -0000
matthew Tue Jul 6 11:56:42 2004 EDT
Modified files:
/loncom/interface/statistics lonsurveyreports.pm
Log:
Added output of part and response ids. Removed bogus 'mean' value from
output in optionresponse case.
Index: loncom/interface/statistics/lonsurveyreports.pm
diff -u loncom/interface/statistics/lonsurveyreports.pm:1.1 loncom/interface/statistics/lonsurveyreports.pm:1.2
--- loncom/interface/statistics/lonsurveyreports.pm:1.1 Tue Jun 15 10:22:45 2004
+++ loncom/interface/statistics/lonsurveyreports.pm Tue Jul 6 11:56:42 2004
@@ -1,6 +1,6 @@
# The LearningOnline Network with CAPA
#
-# $Id: lonsurveyreports.pm,v 1.1 2004/06/15 14:22:45 matthew Exp $
+# $Id: lonsurveyreports.pm,v 1.2 2004/07/06 15:56:42 matthew Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -269,7 +269,7 @@
$Str .= '<tr>'.
'<td><b>'.&mt('Total').'</b></td>'.
'<td>'.$data->{'_count'}.'</td>'.
- '<td> </td>'.
+ '<td>'.&mt('Part [_1], Response [_2]',$partid,$respid).'</td>'.
'</tr>'.$/;
if (exists($data->{'responses'}) &&
ref($data->{'responses'}) eq 'ARRAY') {
@@ -306,12 +306,6 @@
'</tr>'.$/;
}
$Str .= '<tr>'.
- '<td><b>'.&mt('mean').'</b></td>'.
- '<td>'.sprintf("%.2f",$sum/$total).'</td>'.
- '<td> </td>'.
- '<td> </td>'.
- '</tr>'.$/.
- '<tr>'.
'<th>'.&mt('Foil Name').'</th>'.
'<th>'.&mt('Text').'</th>'.
'<th>'.&mt('Freq').'</th>'.