--- loncom/homework/lonsimpleproblemedit.pm	2003/09/21 21:40:06	1.6
+++ loncom/homework/lonsimpleproblemedit.pm	2003/11/04 19:18:16	1.8
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Simple Problem Parameter Setting "Editor"
 #
-# $Id: lonsimpleproblemedit.pm,v 1.6 2003/09/21 21:40:06 www Exp $
+# $Id: lonsimpleproblemedit.pm,v 1.8 2003/11/04 19:18:16 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -61,6 +61,7 @@ sub rawrendering {
     $ENV{'user.name'}=time;
     $ENV{'user.domain'}=time;
     my $result = &Apache::lonxml::xmlparse($request,'web', $problem);
+    undef($Apache::lonhomework::parsing_a_problem);
     $ENV{'user.name'}=$uname;
     $ENV{'user.domain'}=$udom;
     $result=~s/^.*\<body[^\>]*\>//si;
@@ -168,6 +169,7 @@ sub handler {
 	    }
             $ENV{'form.options'}="('".join("','",keys %curoptions)."')";
 	}
+	$ENV{'form.hiddenparts'}='!'.$ENV{'form.questiontype'};
         foreach (keys %ENV) {
 	    if ($_=~/^form\.(\w+)$/) {
                 my $parm=$1;