version 1.159, 2013/12/09 21:33:32
|
version 1.161, 2014/02/05 18:02:15
|
Line 401 sub javascript_validations {
|
Line 401 sub javascript_validations {
|
|
|
my $showcredits; |
my $showcredits; |
my %domdefaults = &Apache::lonnet::get_domain_defaults($domain); |
my %domdefaults = &Apache::lonnet::get_domain_defaults($domain); |
if ($domdefaults{'officialcredits'} || $domdefaults{'unofficialcredits'}) { |
if ($domdefaults{'officialcredits'} || $domdefaults{'unofficialcredits'} || $domdefaults{'textbookcredits'}) { |
$showcredits = 1; |
$showcredits = 1; |
} |
} |
|
|
Line 1013 sub print_upload_manager_footer {
|
Line 1013 sub print_upload_manager_footer {
|
.&Apache::lonhtmlcommon::row_closure(); |
.&Apache::lonhtmlcommon::row_closure(); |
} |
} |
if ($context eq 'course' || $context eq 'domain') { |
if ($context eq 'course' || $context eq 'domain') { |
$Str .= &forceid_change($context); |
$Str .= &Apache::lonhtmlcommon::row_title(&mt('Student/Employee ID')) |
|
.&forceid_change($context) |
|
.&Apache::lonhtmlcommon::row_closure(1); # last row in pick_box |
} |
} |
|
|
$Str .= &Apache::lonhtmlcommon::end_pick_box(); |
$Str .= &Apache::lonhtmlcommon::end_pick_box(); |
Line 1047 sub get_defaultcredits {
|
Line 1049 sub get_defaultcredits {
|
return unless(($cdom =~ /^$match_domain$/) && ($cnum =~ /^$match_courseid$/)); |
return unless(($cdom =~ /^$match_domain$/) && ($cnum =~ /^$match_courseid$/)); |
my ($defaultcredits,$domdefcredits); |
my ($defaultcredits,$domdefcredits); |
my %domdefaults = &Apache::lonnet::get_domain_defaults($cdom); |
my %domdefaults = &Apache::lonnet::get_domain_defaults($cdom); |
if ($domdefaults{'officialcredits'} || $domdefaults{'unofficialcredits'}) { |
if ($domdefaults{'officialcredits'} || $domdefaults{'unofficialcredits'} || $domdefaults{'textbookcredits'}) { |
my $instcode = $env{'course.'.$cdom.'_'.$cnum.'.internal.coursecode'}; |
my $instcode = $env{'course.'.$cdom.'_'.$cnum.'.internal.coursecode'}; |
if ($instcode) { |
if ($instcode) { |
$domdefcredits = $domdefaults{'officialcredits'}; |
$domdefcredits = $domdefaults{'officialcredits'}; |
|
} elsif ($env{'course.'.$cdom.'_'.$cnum.'.internal.textbook'}) { |
|
$domdefcredits = $domdefaults{'textbookcredits'}; |
} else { |
} else { |
$domdefcredits = $domdefaults{'unofficialcredits'}; |
$domdefcredits = $domdefaults{'unofficialcredits'}; |
} |
} |
Line 1076 sub get_defaultcredits {
|
Line 1080 sub get_defaultcredits {
|
sub forceid_change { |
sub forceid_change { |
my ($context) = @_; |
my ($context) = @_; |
my $output = |
my $output = |
&Apache::lonhtmlcommon::row_title(&mt('Student/Employee ID')) |
'<label><input type="checkbox" name="forceid" value="yes" />' |
.'<label><input type="checkbox" name="forceid" value="yes" />' |
|
.&mt('Disable Student/Employee ID Safeguard and force change of conflicting IDs') |
.&mt('Disable Student/Employee ID Safeguard and force change of conflicting IDs') |
.'</label><br />'."\n" |
.'</label><br />'."\n" |
.&mt('(only do if you know what you are doing.)')."\n"; |
.&mt('(only do if you know what you are doing.)')."\n"; |
Line 1087 sub forceid_change {
|
Line 1090 sub forceid_change {
|
&mt('Update student/employee ID in courses in which user is active/future student,[_1](if forcing change).','<br />'). |
&mt('Update student/employee ID in courses in which user is active/future student,[_1](if forcing change).','<br />'). |
'</label>'."\n"; |
'</label>'."\n"; |
} |
} |
$output .= &Apache::lonhtmlcommon::row_closure(1); # last row in pick_box |
|
return $output; |
return $output; |
} |
} |
|
|