--- loncom/auth/loncacc.pm 2004/01/27 23:06:22 1.31.2.1 +++ loncom/auth/loncacc.pm 2004/01/27 22:54:59 1.33 @@ -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.2.1 2004/01/27 23:06:22 albertel Exp $ +# $Id: loncacc.pm,v 1.33 2004/01/27 22:54:59 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -48,7 +48,7 @@ use Apache::lonnet(); 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 ''; }