--- loncom/auth/loncacc.pm 2003/09/20 17:44:22 1.31 +++ loncom/auth/loncacc.pm 2004/01/15 20:22:47 1.32 @@ -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.31 2003/09/20 17:44:22 www Exp $ +# $Id: loncacc.pm,v 1.32 2004/01/15 20:22:47 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -46,7 +46,7 @@ use Apache::lonlocal; sub constructaccess { my ($url,$ownerdomain)=@_; - my ($ownername)=($url=~/\/(?:\~|priv\/|home\/)(\w+)/); + my ($ownername)=($url=~/\/(?:\~|priv\/|home\/)(\w+)\//); unless (($ownername) && ($ownerdomain)) { return ''; } # We do not allow editing of previous versions of files. if ($url=~/\.(\d+)\.(\w+)$/) { return ''; }