--- loncom/publisher/Attic/lonconstruct.pm 2006/04/06 22:15:18 1.32 +++ loncom/publisher/Attic/lonconstruct.pm 2006/04/11 18:58:22 1.33 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Construction Space Page Wrapper for Construction # -# $Id: lonconstruct.pm,v 1.32 2006/04/06 22:15:18 albertel Exp $ +# $Id: lonconstruct.pm,v 1.33 2006/04/11 18:58:22 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -109,25 +109,27 @@ sub handler { $toprows = '110'; $topsrc = '/adm/localize/adm/publisher.html'; } - my $extra; - &Apache::lontexconvert::jsMath_reset(); - if ($env{'environment.texengine'} eq 'jsMath' || - $env{'form.texengine'} eq 'jsMath' ) { - $extra.=&Apache::lontexconvert::jsMath_header(); - } - my $html=&Apache::lonxml::xmlbegin(); - $r->print(<LON-CAPA Construction Space + + my $js=qq| - - + |; + + my $start_page= + &Apache::loncommon::start_page('Construction Space',$js, + {'frameset' => 1, + 'add_entries' => { + 'rows' => "$toprows,*", + 'border' => "0",}}); + my $end_page= + &Apache::loncommon::end_page({'frameset' => 1}); + + $r->print(< - - +$end_page ENDPAGE return OK; }