');
+}
+
+sub endSettingsScreen {
+ my ($r)=@_;
+ $r->print('
--- loncom/interface/lonparmset.pm 2012/12/17 15:04:05 1.522.2.5 +++ loncom/interface/lonparmset.pm 2013/04/08 23:21:15 1.531 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to set parameters for assessments # -# $Id: lonparmset.pm,v 1.522.2.5 2012/12/17 15:04:05 raeburn Exp $ +# $Id: lonparmset.pm,v 1.531 2013/04/08 23:21:15 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -314,6 +314,31 @@ use HTML::Entities; use LONCAPA qw(:DEFAULT :match); +sub startSettingsScreen { + my ($r,$mode,$crstype)=@_; + + my $tabtext = &mt('Course Settings'); + if ($crstype eq 'Community') { + $tabtext = &mt('Community Settings'); + } + $r->print("\n".'