--- loncom/auth/loncacc.pm 2002/09/10 14:26:13 1.22 +++ loncom/auth/loncacc.pm 2003/02/03 18:03:52 1.25 @@ -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.22 2002/09/10 14:26:13 www Exp $ +# $Id: loncacc.pm,v 1.25 2003/02/03 18:03:52 harris41 Exp $ # # Copyright Michigan State University Board of Trustees # @@ -31,7 +31,6 @@ # YEAR=2001 # 01/06,01/11,6/1,9/25,9/28,11/22,12/25,12/26, # 01/06/01,05/04,05/05,05/09 Gerd Kortemeyer -# 12/21 Scott Harrison # YEAR=2002 # 1/4 Gerd Kortemeyer ### @@ -48,7 +47,8 @@ sub constructaccess { my ($url,$ownerdomain)=@_; 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 ''; } if (($ownername eq $ENV{'user.name'}) && ($ownerdomain eq $ENV{'user.domain'})) { return ($ownername,$ownerdomain); @@ -190,7 +190,7 @@ Apache::lonacc - Cookie Based Access Han =head1 SYNOPSIS -Invoked (for various locations) by /etc/httpd/conf/srm.conf: +Invoked (for various locations) by /etc/httpd/conf/loncapa_apache.conf: PerlAccessHandler Apache::loncacc