version 1.79, 2013/08/16 03:25:05
|
version 1.82, 2014/12/12 14:30:47
|
Line 290 sub print_main_frame {
|
Line 290 sub print_main_frame {
|
# Get course settings |
# Get course settings |
my %enrollvar; |
my %enrollvar; |
my %settings = &Apache::lonnet::dump('environment',$dom,$crs); |
my %settings = &Apache::lonnet::dump('environment',$dom,$crs); |
foreach my $item (keys %settings) { |
foreach my $item (keys(%settings)) { |
if ($item =~ m/^internal\.(.+)$/) { |
if ($item =~ m/^internal\.(.+)$/) { |
$enrollvar{$1} = $settings{$item}; |
$enrollvar{$1} = $settings{$item}; |
} elsif ($item =~ /^default_enrollment_(start|end)_date$/) { |
} elsif ($item =~ /^default_enrollment_(start|end)_date$/) { |
Line 749 sub print_main_frame {
|
Line 749 sub print_main_frame {
|
$r->print( |
$r->print( |
&mt('Currently, this LON-CAPA course is crosslisted with [quant,_1,course section,course sections].',$cross_str).' '. |
&mt('Currently, this LON-CAPA course is crosslisted with [quant,_1,course section,course sections].',$cross_str).' '. |
&mt('Students enrolling in these course sections will be automatically added to the class roster for the course, if you have chosen to enable a nightly automated enrollment update.').' '. |
&mt('Students enrolling in these course sections will be automatically added to the class roster for the course, if you have chosen to enable a nightly automated enrollment update.').' '. |
&mt('For each crosslisting, leave the checkbox checked if you want registered students in that course to be included in the student roster for LON-CAPA course: [_1; otherwise uncheck it.',"<b>$realm ($enrollvar{coursecode})</b>").' '. |
&mt('For each crosslisting, leave the checkbox checked if you want registered students in that course to be included in the student roster for LON-CAPA course: [_1]; otherwise uncheck it.',"<b>$realm ($enrollvar{coursecode})</b>").' '. |
&mt('If you wish to change the section ID assigned in your LON-CAPA course for a crosslisted course, enter the new section ID in the appropriate textbox.').' '. |
&mt('If you wish to change the section ID assigned in your LON-CAPA course for a crosslisted course, enter the new section ID in the appropriate textbox.').' '. |
&mt('The LON-CAPA section ID can be left (or set to) empty, if you do not wish to tie a section ID to this crosslisting.').' '. |
&mt('The LON-CAPA section ID can be left (or set to) empty, if you do not wish to tie a section ID to this crosslisting.').' '. |
&mt('If you wish to add new crosslisted courses, enter the number of new courses to add in the textbox at the bottom of the page.').' '. |
&mt('If you wish to add new crosslisted courses, enter the number of new courses to add in the textbox at the bottom of the page.').' '. |
Line 2726 sub print_update_result {
|
Line 2726 sub print_update_result {
|
my %settings = |
my %settings = |
&Apache::lonnet::get('environment', |
&Apache::lonnet::get('environment', |
['internal.coursecode','internal.sectionnums','internal.crosslistings', |
['internal.coursecode','internal.sectionnums','internal.crosslistings', |
'internal.authtype','internal.autharg','internal.showphoto','internal.defaultcredits'], |
'internal.authtype','internal.autharg','internal.showphoto','internal.defaultcredits', |
|
'internal.textbook'], |
$dom,$crs); |
$dom,$crs); |
my $coursecode = $settings{'internal.coursecode'}; |
my $coursecode = $settings{'internal.coursecode'}; |
my $authtype = $settings{'internal.authtype'}; |
my $authtype = $settings{'internal.authtype'}; |
my $autharg = $settings{'internal.autharg'}; |
my $autharg = $settings{'internal.autharg'}; |
my $showphotos = $settings{'internal.showphoto'}; |
my $showphotos = $settings{'internal.showphoto'}; |
|
my $textbook = $settings{'internal.textbook'}; |
my ($showcredits,$defaultcredits); |
my ($showcredits,$defaultcredits); |
my %domdefaults = &Apache::lonnet::get_domain_defaults($dom); |
my %domdefaults = &Apache::lonnet::get_domain_defaults($dom); |
if ($domdefaults{'officialcredits'} || $domdefaults{'unofficialcredits'}) { |
if ($domdefaults{'officialcredits'} || $domdefaults{'unofficialcredits'} || $domdefaults{'textbookcredits'}) { |
$showcredits = 1; |
$showcredits = 1; |
$defaultcredits = $settings{'internal.defaultcredits'}; |
$defaultcredits = $settings{'internal.defaultcredits'}; |
if ($defaultcredits eq '') { |
if ($defaultcredits eq '') { |
if ($coursecode ne '') { |
if ($coursecode ne '') { |
$defaultcredits = $domdefaults{'officialcredits'}; |
$defaultcredits = $domdefaults{'officialcredits'}; |
|
} elsif ($textbook ne '') { |
|
$defaultcredits = $domdefaults{'textbookcredits'}; |
} else { |
} else { |
$defaultcredits = $domdefaults{'unofficialcredits'}; |
$defaultcredits = $domdefaults{'unofficialcredits'}; |
} |
} |