--- loncom/homework/structuretags.pm	2003/08/30 02:33:25	1.207
+++ loncom/homework/structuretags.pm	2003/09/10 21:18:07	1.209
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA 
 # definition of tags that give a structure to a document
 #
-# $Id: structuretags.pm,v 1.207 2003/08/30 02:33:25 albertel Exp $
+# $Id: structuretags.pm,v 1.209 2003/09/10 21:18:07 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -306,7 +306,9 @@ sub reset_problem_globals {
     undef(%Apache::lonhomework::history);
     undef(%Apache::lonhomework::results);
     undef($Apache::inputtags::part);
-    undef($Apache::lonhomework::parsing_a_problem);
+#don't undef this, lonhomework.pm takes care of this, we use this to 
+#detect if we try to do 2 problems in one file
+#   undef($Apache::lonhomework::parsing_a_problem);
     undef($Apache::lonhomework::name);
 }
 
@@ -931,6 +933,8 @@ sub start_part {
     $Apache::lonhomework::problemstatus=
 	&Apache::lonnet::EXT("resource.$id.problemstatus");
     my $hidden=&Apache::loncommon::check_if_partid_hidden($Apache::inputtags::part);
+    my $expression='$external::part='.$Apache::inputtags::part.';';
+    &Apache::run::run($expression,$safeeval);
 
     if ($target eq 'meta') {
 	return &Apache::response::mandatory_part_meta;