[WWcvs] webwork2: HEAD backport: Added an option to rename the "Change Display

[Sam H. v. a. <act...@de...>]

Log Message:
-----------
HEAD backport: Added an option to rename the "Change Display Settings"
submit buttton. (gage)

Tags:
----
rel-2-1-patches

Modified Files:
--------------
    webwork2/lib/WeBWorK/HTML:
        ScrollingRecordList.pm

Revision Data
-------------
Index: ScrollingRecordList.pm
===================================================================
RCS file: /webwork/cvs/system/webwork2/lib/WeBWorK/HTML/ScrollingRecordList.pm,v
retrieving revision 1.6
retrieving revision 1.6.2.1
diff -Llib/WeBWorK/HTML/ScrollingRecordList.pm -Llib/WeBWorK/HTML/ScrollingRecordList.pm -u -r1.6 -r1.6.2.1
--- lib/WeBWorK/HTML/ScrollingRecordList.pm
+++ lib/WeBWorK/HTML/ScrollingRecordList.pm
@@ -81,6 +81,8 @@
 	my @ids = ();
 	my %labels = ();
 	
+	my $refresh_button_name    = defined($options{refresh_button_name}) ? $options{refresh_button_name}:"Change Display Settings";
+	
 	my @selected_records = $r->param("$name");
 
 	if (@Records) {
@@ -166,7 +168,7 @@
 		   CGI::td(CGI::scrolling_list(%filter_options)),
 		 ]),
 	       ),
-	       CGI::submit("$name!refresh", "Change Display Settings"), CGI::br(),
+	       CGI::submit("$name!refresh", $refresh_button_name), CGI::br(),
 	       CGI::scrolling_list(%list_options),
        );
 }