--- loncom/auth/lonacc.pm 2002/06/15 19:45:26 1.33 +++ loncom/auth/lonacc.pm 2002/07/03 20:54:49 1.34 @@ -1,7 +1,7 @@ # The LearningOnline Network # Cookie Based Access Handler # -# $Id: lonacc.pm,v 1.33 2002/06/15 19:45:26 www Exp $ +# $Id: lonacc.pm,v 1.34 2002/07/03 20:54:49 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -216,10 +216,17 @@ sub handler { $ENV{'request.filename'} = $r->filename; return OK; } -# ----------------------------------------------- Store where they wanted to go - - $ENV{'request.firsturl'}=$requrl; - return FORBIDDEN; +# -------------------------------------------------------------- Not authorized + $requrl=~/\.(\w+)$/; + if ((&Apache::loncommon::fileembstyle($1) eq 'ssi') || + ($requrl=~/^\/adm\/(roles|logout)/)) { +# -------------------------- Store where they wanted to go and get login screen + $ENV{'request.firsturl'}=$requrl; + return FORBIDDEN; + } else { +# --------------------------------------------------------------------- Goodbye + return HTTP_BAD_REQUEST; + } } 1;