--- loncom/auth/loncacc.pm 2009/10/07 14:47:48 1.50 +++ loncom/auth/loncacc.pm 2010/09/30 16:42:30 1.51 @@ -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.50 2009/10/07 14:47:48 raeburn Exp $ +# $Id: loncacc.pm,v 1.51 2010/09/30 16:42:30 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -126,9 +126,14 @@ sub constructaccess { unless ($blocked{'domcoord.author'} eq 'blocked') { if (grep(/^$ownerdomain$/,@possibledomains)) { if ($setpriv) { + my $refresh=$env{'user.refresh.time'}; + if (!$refresh) { + $refresh = $then; + } my $now = time; &Apache::lonnet::check_adhoc_privs($ownerdomain,$ownername, - $then,$now,'ca'); + $then,$refresh,$now,'ca', + 'constructaccess'); } return($ownername,$ownerdomain); }