--- loncom/auth/loncacc.pm 2004/01/27 22:54:59 1.33 +++ loncom/auth/loncacc.pm 2004/02/02 18:50:21 1.34 @@ -2,7 +2,7 @@ # Cookie Based Access Handler for Construction Area # (lonacc: 5/21/99,5/22,5/29,5/31 Gerd Kortemeyer) # -# $Id: loncacc.pm,v 1.33 2004/01/27 22:54:59 albertel Exp $ +# $Id: loncacc.pm,v 1.34 2004/02/02 18:50:21 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -53,7 +53,6 @@ sub constructaccess { # We do not allow editing of previous versions of files. if ($url=~/\.(\d+)\.(\w+)$/) { return ''; } my @possibledomains = &Apache::lonnet::current_machine_domains(); - &Apache::lonnet::logthis("got domains of ".join(':',@possibledomains)); if ($ownername eq $ENV{'user.name'}) { foreach my $domain (@possibledomains) { if ($domain eq $ENV{'user.domain'}) { @@ -62,7 +61,6 @@ sub constructaccess { } } - foreach my $domain (@possibledomains) { my $capriv='user.priv.ca./'.$domain.'/'.$ownername.'./'; foreach (keys %ENV) {