--- loncom/interface/lonindexer.pm 2004/05/11 05:19:30 1.104 +++ loncom/interface/lonindexer.pm 2004/05/11 07:35:12 1.105 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Directory Indexer # -# $Id: lonindexer.pm,v 1.104 2004/05/11 05:19:30 albertel Exp $ +# $Id: lonindexer.pm,v 1.105 2004/05/11 07:35:12 taceyjo1 Exp $ # # Copyright Michigan State University Board of Trustees # @@ -127,7 +127,28 @@ sub handler { { if ($ENV{'form.launch'} eq '1') { &start_fresh_session(); - } + } + #Hijack lonindexer to verify a title and be close down. + if ($ENV{'form.launch'} eq '2') { + #$r->content_type('text/html'); + my $verify_title = &Apache::lonnet::gettitle($ENV{'form.acts'}); + title: $verify_title"); + $r->print(< + + + + +ENDSUBM + return OK; + } + # -------------------- refresh environment with user database values (in %hash) &setvalues(\%hash,'form.catalogmode',\%ENV,'form.catalogmode' ); @@ -236,11 +257,9 @@ END $catalogmodefunctions=<