--- loncom/homework/structuretags.pm	2006/07/27 20:47:03	1.362
+++ loncom/homework/structuretags.pm	2006/08/28 14:26:04	1.364
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA 
 # definition of tags that give a structure to a document
 #
-# $Id: structuretags.pm,v 1.362 2006/07/27 20:47:03 albertel Exp $
+# $Id: structuretags.pm,v 1.364 2006/08/28 14:26:04 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);
     my $page_start = &Apache::loncommon::start_page($name,$extra_head,
 						    \%body_args);
 
@@ -593,7 +593,6 @@ sub start_problem {
 	$Apache::lonhomework::scantronmode=1;
     }
 
-    &initialize_storage();
     if ($target ne 'analyze') {
 	if ($target eq 'web') {
 	    &Apache::lonhomework::showhash(%Apache::lonhomework::history);
@@ -618,6 +617,8 @@ sub start_problem {
     }
     $Apache::lonhomework::default_type = $Apache::lonhomework::type;
 
+    &initialize_storage();
+
     #added vars to the scripting enviroment
     my $expression='$external::part=\''.$Apache::inputtags::part.'\';';
     $expression.='$external::type=\''.$Apache::lonhomework::type.'\';';