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),
);
}
|