--- loncom/auth/lonacc.pm 2006/06/22 13:20:46 1.81 +++ loncom/auth/lonacc.pm 2006/06/30 04:23:33 1.83 @@ -1,7 +1,7 @@ # The LearningOnline Network # Cookie Based Access Handler # -# $Id: lonacc.pm,v 1.81 2006/06/22 13:20:46 raeburn Exp $ +# $Id: lonacc.pm,v 1.83 2006/06/30 04:23:33 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -414,7 +414,7 @@ sub handler { &Apache::lonnet::countacc($requrl); $requrl=~/\.(\w+)$/; if ((&Apache::loncommon::fileembstyle($1) eq 'ssi') || - ($requrl=~/^\/adm\/.*\/(aboutme|navmaps|smppg|bulletinboard)(\?|$)/) || + ($requrl=~/^\/adm\/.*\/(aboutme|navmaps|smppg|grppg|bulletinboard)(\?|$)/) || ($requrl=~/^\/adm\/wrapper\//) || ($requrl=~m|^/adm/coursedocs/showdoc/|) || ($requrl=~m|\.problem/smpedit$|) || @@ -504,7 +504,7 @@ sub handler { #FIXME need to cause generation of an intermediate page } } elsif ($requrl =~ m|/+uploaded/([^/]+)/([^/]+)/groups/([^/]+)/portfolio/(.+)$|) { - my $result = &portfolio_access($1,$2,$4.'/'.$3,$3); + my $result = &portfolio_access($1,$2,$3.'/'.$4,$3); if ($result eq 'ok') { return OK; } elsif ($result =~ /^guest:(\w+)$/) {