Return to simpleauthen.pm CVS log | Up to [LON-CAPA] / loncom / auth |
1.1 ! albertel 1: package Apache::simpleauthen; ! 2: ! 3: use strict; ! 4: use Apache::Constants qw(:common); ! 5: use Apache::lonnet; ! 6: ! 7: sub handler { ! 8: my ($r) = @_; ! 9: return FORBIDDEN; ! 10: } ! 11: ! 12: 1;