--- loncom/auth/restrictedaccess.pm 2006/07/21 19:42:12 1.5 +++ loncom/auth/restrictedaccess.pm 2008/12/11 14:52:26 1.7 @@ -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 { @@ -97,7 +97,7 @@ function verify() { $r->print('


'); $r->print(&Apache::loncommon::start_data_table()); $r->print(&Apache::loncommon::start_data_table_row()); - $r->print(''.&mt('Passphrase: ').''. + $r->print(''.&mt('Passphrase: ').''. ''); $r->print(&Apache::loncommon::end_data_table_row()); $r->print(&Apache::loncommon::start_data_table_row());