'."\n".
+ &mt('Disable changing password for users with student role by course owner').' '."\n".
&Apache::lonhtmlcommon::row_closure());
}
}
@@ -1211,7 +1216,7 @@ sub print_course_modification_page {
''.$lt{'whom'}.' '.
&Apache::loncommon::end_data_table_header_row()."\n");
my %optionname;
- $optionname{''} = &mt('Use domain default');
+ $optionname{''} = &mt('Use domain default');
$optionname{'0'} = $dctitle;
$optionname{'1'} = $cctitle;
foreach my $item (@{$selfenrollrows}) {
@@ -1226,12 +1231,12 @@ sub print_course_modification_page {
$checked{'1'} = ' checked="checked"';
} else {
$checked{''} = ' checked="checked"';
- }
+ }
$r->print(&Apache::loncommon::start_data_table_row()."\n".
''.$selfenrolltitles->{$item}.' '."\n".
''.&mt('[_1] configures',$default).' '."\n".
'');
- foreach my $option ('','0','1') {
+ foreach my $option ('','0','1') {
$r->print(''.
''.$hidden_elements);
+ &Apache::lonhtmlcommon::end_pick_box().'
');
+ $r->print('');
+ my @actions =
+ (''.
+ &mt('Pick another action').' ');
+ $r->print(''.&mt('Self-enrollment with a student role in: [_1]',
- ''.$cdesc.' ').' '."\n");
+ $r->print(''.&mt('Self-enrollment with a student role').' '."\n".
+ ''.&mt($type).': '.$cdesc.' '.
+ &mt('Pick another action').' ');
+ $r->print('
-$helpitem $lt{'requ'} $cdesc
-$lt{'curd'}: $domdefdisplay
-
-
-
-
-$lt{'valu'}
-
-
-
-
-$submit
-
-$hidden_elements
-$lt{'back'}
-
-ENDDOCUMENT
- return;
-}
-
-sub print_set_exttool {
- my ($r,$cdom,$cnum,$cdesc,$type,$readonly) = @_;
- my %titles = &exttool_titles($type);
- my ($domdef,$domdefdom,$checkeddom,$checkedcrs,$domdefdisplay,$divsty);
- $domdef = 0;
- $domdefdom = 1;
- $checkeddom = ' checked="checked"';
- $divsty = 'display:none';
- my %settings = &Apache::lonnet::get('environment',['internal.coursecode',
- 'internal.textbook'],$cdom,$cnum);
- my $lctype = &get_lctype($type,\%settings);
- my %domconfig =
- &Apache::lonnet::get_dom('configuration',['coursedefaults'],$cdom);
- if (ref($domconfig{'coursedefaults'}) eq 'HASH') {
- if (ref($domconfig{'coursedefaults'}{'exttool'}) eq 'HASH') {
- if (exists($domconfig{'coursedefaults'}{'exttool'}{$lctype})) {
- $domdef = $domconfig{'coursedefaults'}{'exttool'}{$lctype};
- }
- }
- if (ref($domconfig{'coursedefaults'}{'domexttool'}) eq 'HASH') {
- if (exists($domconfig{'coursedefaults'}{'domexttool'}{$lctype})) {
- $domdefdom = $domconfig{'coursedefaults'}{'domexttool'}{$lctype};
+ foreach my $option (@{$options}) {
+ if ($item eq 'crseditors') {
+ if (grep(/^\Q$option\E$/,@currcrseditors)) {
+ $crschecked{$option} = ' checked="checked"';
+ }
+ } elsif ($currcrsval eq $option) {
+ $crschecked{$option} = ' checked="checked"';
+ } else {
+ $crschecked{$option} = '';
}
}
- }
- if ($domdef && $domdefdom) {
- $domdefdisplay = $titles{'both'};
- } elsif ($domdef) {
- $domdefdisplay = $titles{'crs'};
- } elsif ($domdefdom) {
- $domdefdisplay = $titles{'dom'};
- } else {
- $domdefdisplay = $titles{'none'};
- }
- my %settings = &Apache::lonnet::get('environment',['internal.exttool'],$cdom,$cnum);
- my $crsexttool = $settings{'internal.exttool'};
- my %crschecked = (
- both => ' checked="checked"',
- dom => '',
- crs => '',
- none => '',
- );
- if ($crsexttool ne '') {
- $checkedcrs = $checkeddom;
- $checkeddom = '';
- $divsty = 'display:inline-block';
- foreach my $option ('both','dom','crs','none') {
- if ($crsexttool eq $option) {
+ } else {
+ if ($item eq 'crseditors') {
+ my %domdefs = &Apache::lonnet::get_domain_defaults($cdom);
+ @currcrseditors = split(/,/,$domdefs{'crseditors'});
+ }
+ foreach my $option (@{$options}) {
+ if ($item eq 'crseditors') {
+ if (grep(/^\Q$option\E$/,@currcrseditors)) {
+ $crschecked{$option} = ' checked="checked"';
+ }
+ } elsif ($crsdefault eq $option) {
$crschecked{$option} = ' checked="checked"';
} else {
$crschecked{$option} = '';
}
}
}
- &print_header($r,$type);
- my $hidden_elements = &hidden_form_elements();
- my ($disabled,$submit);
+ my ($disabled,$submit,$inputtype,$separator);
if ($readonly) {
$disabled = ' disabled="disabled"';
} else {
- $submit = ''.
+ ' '.$separator."\n";
+ }
+ &print_header($r,$type);
+ my $hidden_elements = &hidden_form_elements();
+ my $helpitem = &Apache::loncommon::help_open_topic($helpfile);
+ my $showtype = &mt($type);
$r->print(<
-$helpitem $titles{'extt'}
-$type: $cdesc $titles{'curd'}: $domdefdisplay
+$helpitem $title
+$showtype: $cdesc
-
-
+
$titles{'valu'}
-
-
-
-
-
-
$submit
-
$hidden_elements
-$titles{'back'}
+
ENDDOCUMENT
+ my @actions =
+ (''.
+ $titles{'back'}.' ');
+ $r->print(''.&mt('Self-enrollment with a student role in: [_1]',
- ''.$cdesc.' ').' '."\n");
- $r->print('');
+ my @actions =
+ (''.
+ &mt('Pick another action').' ');
+ $r->print('
';
foreach my $warn (@warnings) {
@@ -1900,8 +1962,8 @@ sub modify_course {
$reply = $chgresponse.$nochgresponse.$warning;
}
&print_header($r,$type);
- my $mainheader = &modifiable_only_title($type);
- $reply = ''.$mainheader.' '.$cdesc.' '."\n".
+ $reply = ''.&modifiable_only_title($type).' '."\n".
+ ''.&mt($type).': '.$cdesc.' '.$reply.'
'."\n".
' ';
+ $reply .= ''.
+ ''.$cdesc.' ');
- $r->print('');
+ my @actions =
+ (''.
+ &mt('Pick another action').' ');
+ $r->print(''.
+ &mt('Pick another action').' ');
+ $r->print(''.
+ $lt{'back'}.' ');
+ $r->print(''.
+ &mt('Pick another action').' ');
+ $r->print(''.
+ $titles{'back'}.' ');
+ $r->print(' {'onload' => "hide_searching(); courseSet(document.filterpicker.official, 'load');"},
- };
- } elsif ($env{'form.phase'} eq 'setltiauth') {
+ } elsif ($env{'form.phase'} =~ /^set(ltiauth|exttool|crseditors)$/) {
$starthash = {
- add_entries => {'onload' => "toggleLTIOptions(document.setltiauth);"},
- };
- } elsif ($env{'form.phase'} eq 'setexttool') {
- $starthash = {
- add_entries => {'onload' => "toggleExtToolOptions(document.setexttool);"},
+ add_entries => {'onload' => "toggleOptions(document.$env{'form.phase'},'$env{'form.phase'}');"},
};
}
$r->print(&Apache::loncommon::start_page('View/Modify Course/Community Settings',
@@ -2919,7 +2878,15 @@ ENDJS
} else {
$bread_text = 'Course Settings';
}
- $r->print(&Apache::lonhtmlcommon::breadcrumbs($bread_text));
+ my $helpcomponent;
+ if ($env{'form.phase'} eq 'menu') {
+ if ($type eq 'Community') {
+ $helpcomponent = 'Domain_Modify_Community';
+ } else {
+ $helpcomponent = 'Domain_Modify_Course';
+ }
+ }
+ $r->print(&Apache::lonhtmlcommon::breadcrumbs($bread_text,$helpcomponent));
return;
}
@@ -3000,14 +2967,15 @@ sub course_settings_descrip {
}
sub hidden_form_elements {
- my $hidden_elements =
+ my $hidden_elements =
&Apache::lonhtmlcommon::echo_form_input(['gosearch','updater','coursecode',
'prevphase','numlocalcc','courseowner','login','coursequota','intarg',
'locarg','krbarg','krbver','counter','hidefromcat','usecategory',
'threshold','postsubmit','postsubtimeout','defaultcredits','uploadquota',
'selfenrollmgrdc','selfenrollmgrcc','action','state','currsec_st',
'sections','newsec','mysqltables','nopasswdchg','ltiauth','ltiauthset',
- 'exttoolset','exttool'],['^selfenrollmgr_','^selfenroll_'])."\n".
+ 'exttoolset','exttool','crseditorsset','crseditors'],
+ ['^selfenrollmgr_','^selfenroll_'])."\n".
'