--- loncom/interface/lonnavmaps.pm 2005/02/05 06:52:50 1.315 +++ loncom/interface/lonnavmaps.pm 2005/02/17 08:29:43 1.316 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Navigate Maps Handler # -# $Id: lonnavmaps.pm,v 1.315 2005/02/05 06:52:50 albertel Exp $ +# $Id: lonnavmaps.pm,v 1.316 2005/02/17 08:29:43 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -38,6 +38,7 @@ use Apache::lonlocal; use Apache::lonnet; use POSIX qw (floor strftime); use Data::Dumper; # for debugging, not always +use Time::HiRes qw( gettimeofday tv_interval ); # symbolic constants sub SYMB { return 1; } @@ -142,7 +143,7 @@ sub handler { sub real_handler { my $r = shift; - + #my $t0=[&gettimeofday()]; # Handle header-only request if ($r->header_only) { if ($ENV{'browser.mathml'}) { @@ -184,8 +185,9 @@ MENU $navstatus MENU } + my $html=&Apache::lonxml::xmlbegin(); $r->print(<<"ENDSUBM"); - + $html