--- loncom/auth/restrictedaccess.pm	2006/07/21 19:42:12	1.5
+++ loncom/auth/restrictedaccess.pm	2006/07/22 23:10:45	1.6
@@ -73,8 +73,8 @@ sub handler {
 sub setup_handler {
     my ($r) = @_;
     $r->set_handlers('PerlHandler'=> 
-		     \&Apache::restrictedaccess::handler);
-    $r->content_type('perl-script');		    
+		     [\&Apache::restrictedaccess::handler]);
+    $r->handler('perl-script');		    
 }
 
 sub print_entryform {