--- loncom/homework/structuretags.pm 2006/08/28 14:26:04 1.364 +++ loncom/homework/structuretags.pm 2006/09/29 20:55:33 1.366 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # definition of tags that give a structure to a document # -# $Id: structuretags.pm,v 1.364 2006/08/28 14:26:04 albertel Exp $ +# $Id: structuretags.pm,v 1.366 2006/09/29 20:55:33 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -134,7 +134,7 @@ sub page_start { $body_args{'force_register'} = 1; $body_args{'add_entries'} = \%add_entries; } - &Apache::lonlocal::mt_escape(\$name); + $body_args{'no_auto_mt_title'} = 1; my $page_start = &Apache::loncommon::start_page($name,$extra_head, \%body_args); @@ -594,9 +594,6 @@ sub start_problem { } if ($target ne 'analyze') { - if ($target eq 'web') { - &Apache::lonhomework::showhash(%Apache::lonhomework::history); - } if ($env{'request.state'} eq 'construct') { &set_problem_state('0'); } $Apache::lonhomework::type=&Apache::lonnet::EXT('resource.0.type'); if (($env{'request.state'} eq 'construct') && @@ -618,6 +615,10 @@ sub start_problem { $Apache::lonhomework::default_type = $Apache::lonhomework::type; &initialize_storage(); + if ($target eq 'web') { + &Apache::lonxml::debug(" grading history "); + &Apache::lonhomework::showhash(%Apache::lonhomework::history); + } #added vars to the scripting enviroment my $expression='$external::part=\''.$Apache::inputtags::part.'\';';