--- loncom/homework/lonhomework.pm	2004/05/27 22:25:16	1.177
+++ loncom/homework/lonhomework.pm	2004/09/18 17:29:29	1.179
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # The LON-CAPA Homework handler
 #
-# $Id: lonhomework.pm,v 1.177 2004/05/27 22:25:16 albertel Exp $
+# $Id: lonhomework.pm,v 1.179 2004/09/18 17:29:29 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -52,7 +52,7 @@ use Apache::Constants qw(:common);
 use HTML::Entities();
 use Apache::loncommon();
 use Apache::lonlocal;
-#use Time::HiRes qw( gettimeofday tv_interval );
+use Time::HiRes qw( gettimeofday tv_interval );
 
 BEGIN {
     &Apache::lonxml::register_insert();
@@ -453,7 +453,8 @@ sub analyze_header {
             <head><title>'.&mt("Analyzing a problem").'</title></head>
             <body bgcolor="#FFFFFF">'.&Apache::lonxml::message_location().'
             <form name="lonhomework" method="POST" action="'.
-	    &HTML::Entities::encode($ENV{'request.uri'},'<>&"').'">
+	    &HTML::Entities::encode($ENV{'request.uri'},'<>&"').'">'.
+	    &Apache::structuretags::remember_problem_state().'
             <input type="submit" name="problemmode" value="'.&mt("EditXML").'" />
             <input type="submit" name="problemmode" value="'.&mt('Edit').'" />
             <hr />
@@ -565,15 +566,16 @@ sub editxmlmode {
 	    &Apache::loncommon::helpLatexCheatsheet("Problem_Editor_XML_Index",
 						    "Problem Editing Help").
 						    '</td><td>'.
-       &Apache::loncommon::help_open_faq(5).
-       &Apache::loncommon::help_open_bug('Authoring').'</td></tr></table>';
+       &Apache::loncommon::help_open_menu('',undef,undef,undef,5,'Authoring').
+                '</td></tr></table>';
 	if ($cols > 80) { $cols = 80; }
 	if ($cols < 70) { $cols = 70; }
 	if ($rows < 20) { $rows = 20; }
 	$result.='<html><body bgcolor="#FFFFFF">'.
 	    &Apache::lonxml::message_location().'
             <form name="lonhomework" method="POST" action="'.
-	    &HTML::Entities::encode($ENV{'request.uri'},'<>&"').'">
+	    &HTML::Entities::encode($ENV{'request.uri'},'<>&"').'">'.
+	    &Apache::structuretags::remember_problem_state().'
             <input type="hidden" name="problemmode" value="'.&mt('EditXML').'" />
             <input type="submit" name="problemmode" accesskey="d" value="'.&mt('Discard Edits and View').'" />
             <input type="submit" name="problemmode" accesskey="e" value="'.&mt('Edit').'" />
