Log Message:
-----------
On web page, display a pretty sort_mthod_name. E.g. remove underscores.
Arnie
Modified Files:
--------------
webwork-modperl/lib/WeBWorK/ContentGenerator/Instructor:
StudentProgress.pm
Revision Data
-------------
Index: StudentProgress.pm
===================================================================
RCS file: /webwork/cvs/system/webwork-modperl/lib/WeBWorK/ContentGenerator/Instructor/StudentProgress.pm,v
retrieving revision 1.12
retrieving revision 1.13
diff -Llib/WeBWorK/ContentGenerator/Instructor/StudentProgress.pm -Llib/WeBWorK/ContentGenerator/Instructor/StudentProgress.pm -u -r1.12 -r1.13
--- lib/WeBWorK/ContentGenerator/Instructor/StudentProgress.pm
+++ lib/WeBWorK/ContentGenerator/Instructor/StudentProgress.pm
@@ -298,7 +298,16 @@
}
};
-
+ my %display_sort_method_name = (
+ last_name => 'last name',
+ first_name => 'first name',
+ email_address => 'email address',
+ score => 'score',
+ index => 'success indicator',
+ section => 'section',
+ recitation => 'recitation',
+ user_id => 'login name',
+ );
###############################################################
# Print tables
###############################################################
@@ -511,7 +520,7 @@
Click heading to sort table. ",
CGI::br(),
CGI::br(),
- defined($sort_method_name) ?" Entries are sorted by $sort_method_name":"",
+ defined($sort_method_name) ?" Entries are sorted by $display_sort_method_name{$sort_method_name}.":"",
CGI::start_table({-border=>5,style=>'font-size:smaller'}),
CGI::Tr(CGI::td( {-align=>'left'},
['Name'.CGI::br().CGI::a({"href"=>$self->systemLink($setStatsPage,params=>{sort=>'first_name' })},'First').
|
