--- loncom/interface/lontest.pm 2002/08/20 21:29:34 1.7 +++ loncom/interface/lontest.pm 2002/12/09 22:41:50 1.9 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # A debugging harness. # -# $Id: lontest.pm,v 1.7 2002/08/20 21:29:34 www Exp $ +# $Id: lontest.pm,v 1.9 2002/12/09 22:41:50 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -52,13 +52,13 @@ sub section $r->send_http_header; return OK if $r->header_only; - my $bodytag=&Apache::loncommon::bodytag("admin","List Environment"); + my $bodytag=&Apache::loncommon::bodytag("List Environment","admin"); $r->print(''.$bodytag); my $envkey; - $->print("