[LON-CAPA-cvs] cvs: loncom /interface loncommon.pm /localize lonlocal.pm
raeburn
raeburn at source.lon-capa.org
Wed Aug 3 14:25:16 EDT 2011
raeburn Wed Aug 3 18:25:16 2011 EDT
Modified files:
/loncom/interface loncommon.pm
/loncom/localize lonlocal.pm
Log:
- No longer request domain config for domain: "public".
Suppress "get_dom failed - no homeserver and/or domain" logspam in lonnet.log.
Index: loncom/interface/loncommon.pm
diff -u loncom/interface/loncommon.pm:1.1015 loncom/interface/loncommon.pm:1.1016
--- loncom/interface/loncommon.pm:1.1015 Tue Jul 26 17:14:56 2011
+++ loncom/interface/loncommon.pm Wed Aug 3 18:25:11 2011
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# a pile of common routines
#
-# $Id: loncommon.pm,v 1.1015 2011/07/26 17:14:56 raeburn Exp $
+# $Id: loncommon.pm,v 1.1016 2011/08/03 18:25:11 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -4456,7 +4456,10 @@
return $env{'environment.color.'.$which};
}
$domain=&determinedomain($domain);
- my %domdesign = &get_domainconf($domain);
+ my %domdesign;
+ unless ($domain eq 'public') {
+ %domdesign = &get_domainconf($domain);
+ }
my $output;
if ($domdesign{$domain.'.'.$which} ne '') {
$output = $domdesign{$domain.'.'.$which};
@@ -11343,7 +11346,10 @@
}
my %is_adv = ( is_adv => $env{'user.adv'} );
- my %domdef = &Apache::lonnet::get_domain_defaults($domain);
+ my %domdef;
+ unless ($domain eq 'public') {
+ %domdef = &Apache::lonnet::get_domain_defaults($domain);
+ }
foreach my $tool ('aboutme','blog','portfolio') {
$userenv{'availabletools.'.$tool} =
Index: loncom/localize/lonlocal.pm
diff -u loncom/localize/lonlocal.pm:1.62 loncom/localize/lonlocal.pm:1.63
--- loncom/localize/lonlocal.pm:1.62 Mon Mar 28 21:10:41 2011
+++ loncom/localize/lonlocal.pm Wed Aug 3 18:25:16 2011
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Localization routines
#
-# $Id: lonlocal.pm,v 1.62 2011/03/28 21:10:41 raeburn Exp $
+# $Id: lonlocal.pm,v 1.63 2011/08/03 18:25:16 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -264,7 +264,7 @@
my $defdom = &Apache::lonnet::default_login_domain();
foreach my $domtype ($Apache::lonnet::env{'user.domain'},$Apache::lonnet::env{'request.role.domain'},$defdom) {
- if ($domtype ne '') {
+ if (($domtype ne '') && ($domtype ne 'public')) {
my %domdefs = &Apache::lonnet::get_domain_defaults($domtype);
if ($domdefs{'lang_def'} ne '') {
push(@languages,$domdefs{'lang_def'});
@@ -382,7 +382,8 @@
if ($uroledomdefs{'timezone_def'} ne '') {
$timezone = $uroledomdefs{'timezone_def'};
}
- } elsif ($Apache::lonnet::env{'user.domain'} ne '') {
+ } elsif (($Apache::lonnet::env{'user.domain'} ne '') &&
+ ($Apache::lonnet::env{'user.domain'} ne 'public')) {
my %udomdefaults =
&Apache::lonnet::get_domain_defaults($Apache::lonnet::env{'user.domain'});
if ($udomdefaults{'timezone_def'} ne '') {
More information about the LON-CAPA-cvs
mailing list