version 1.61, 2013/07/09 00:17:23
|
version 1.65, 2013/12/24 19:15:11
|
Line 449 sub print_setquota {
|
Line 449 sub print_setquota {
|
$uploadquota = $domdefs{$lctype.'quota'}; |
$uploadquota = $domdefs{$lctype.'quota'}; |
} elsif ($settings{'internal.instcode'}) { |
} elsif ($settings{'internal.instcode'}) { |
$uploadquota = $domdefs{'officialquota'}; |
$uploadquota = $domdefs{'officialquota'}; |
|
} elsif ($settings{'internal.textbook'}) { |
|
$uploadquota = $domdefs{'textbookquota'}; |
} else { |
} else { |
$uploadquota = $domdefs{'unofficialquota'}; |
$uploadquota = $domdefs{'unofficialquota'}; |
} |
} |
Line 881 sub modify_course {
|
Line 883 sub modify_course {
|
} |
} |
} |
} |
if (@changes > 0) { |
if (@changes > 0) { |
$chgresponse = &mt("The following settings have been changed:<br/><ul>"); |
$chgresponse = &mt('The following settings have been changed:').'<br/><ul>'; |
} |
} |
if (@nochanges > 0) { |
if (@nochanges > 0) { |
$nochgresponse = &mt("The following settings remain unchanged:<br/><ul>"); |
$nochgresponse = &mt('The following settings remain unchanged:').'<br/><ul>'; |
} |
} |
if (@changes > 0) { |
if (@changes > 0) { |
my $putreply = &Apache::lonnet::put('environment',\%cenv,$cdom,$cnum); |
my $putreply = &Apache::lonnet::put('environment',\%cenv,$cdom,$cnum); |
Line 1252 sub modify_quota {
|
Line 1254 sub modify_quota {
|
'<b>'.$updatedsettings{'internal.uploadquota'}.'</b>').'<br />'); |
'<b>'.$updatedsettings{'internal.uploadquota'}.'</b>').'<br />'); |
} |
} |
} else { |
} else { |
$r->print(&mt('An error occurred storing the quota(s) for group portfolio files and/or uploaded content.'). |
$r->print(&mt('An error occurred storing the quota(s) for group portfolio files and/or uploaded content: '). |
$putreply); |
$putreply); |
} |
} |
} |
} |
Line 1636 sub hidden_form_elements {
|
Line 1638 sub hidden_form_elements {
|
sub showcredits { |
sub showcredits { |
my ($dom) = @_; |
my ($dom) = @_; |
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{'textbokcredits'}) { |
return 1; |
return 1; |
} |
} |
} |
} |