[LON-CAPA-cvs] cvs: loncom /interface lonstatistics.pm
bisitz
bisitz at source.lon-capa.org
Thu Apr 11 11:49:49 EDT 2013
bisitz Thu Apr 11 15:49:49 2013 EDT
Modified files:
/loncom/interface lonstatistics.pm
Log:
Progress Chart - Select one Student
XHTML:
- Escape parameter separators in links
- <table> not within <p>
Index: loncom/interface/lonstatistics.pm
diff -u loncom/interface/lonstatistics.pm:1.157 loncom/interface/lonstatistics.pm:1.158
--- loncom/interface/lonstatistics.pm:1.157 Wed Mar 6 11:39:00 2013
+++ loncom/interface/lonstatistics.pm Thu Apr 11 15:49:49 2013
@@ -1,6 +1,6 @@
# The LearningOnline Network with CAPA
#
-# $Id: lonstatistics.pm,v 1.157 2013/03/06 11:39:00 bisitz Exp $
+# $Id: lonstatistics.pm,v 1.158 2013/04/11 15:49:49 bisitz Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -615,7 +615,7 @@
# Output some of the standard interface components
my $Str;
$Str .= &Apache::lonhtmlcommon::breadcrumbs('Select One Student');
- $Str .= '<p><table cellspacing="5">'."\n";
+ $Str .= '<table cellspacing="5">'."\n";
$Str .= '<tr>';
$Str .= '<th align="center"><b>'.&mt('Sections').'</b></th>';
$Str .= '<th align="center"><b>'.&mt('Groups').'</b></th>';
@@ -633,7 +633,7 @@
'</td>';
$Str .= '</tr>'.$/;
- $Str .= '</table></p>';
+ $Str .= '</table>';
$Str .= '<input type="submit" name="selectstudent" value="'.
&mt('Update Display').'" />';
$r->print($Str);
@@ -696,8 +696,8 @@
.&Apache::loncommon::start_data_table_header_row();
foreach my $field (@Fields) {
$Str .= '<th><a href="/adm/statistics?'.
- 'reportSelected=student_assessment&'.
- 'selectstudent=1&'.
+ 'reportSelected=student_assessment&'.
+ 'selectstudent=1&'.
'sort='.$field.'">'.&mt($field).
'</a></th>';
}
@@ -712,8 +712,8 @@
if ($field eq 'fullname' || $field eq 'username') {
$Str .= '<a href="/adm/statistics?reportSelected=';
$Str .= &escape('student_assessment');
- $Str .= '&sort='.&escape($env{'form.sort'});
- $Str .= '&SelectedStudent=';
+ $Str .= '&sort='.&escape($env{'form.sort'});
+ $Str .= '&SelectedStudent=';
$Str .= &escape($sname).'">';
$Str .= $student->{$field};
$Str .= '</a>';
More information about the LON-CAPA-cvs
mailing list