--- loncom/homework/structuretags.pm	2017/02/03 18:00:30	1.553
+++ loncom/homework/structuretags.pm	2017/02/06 19:54:19	1.554
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA 
 # definition of tags that give a structure to a document
 #
-# $Id: structuretags.pm,v 1.553 2017/02/03 18:00:30 damieng Exp $
+# $Id: structuretags.pm,v 1.554 2017/02/06 19:54:19 damieng Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -414,8 +414,10 @@ sub setmode_javascript {
 <script type="text/javascript">
 // <![CDATA[
 function setmode(form,probmode) {
+    var initial = form.problemmode.value;
     form.problemmode.value = probmode;
     form.submit();
+    form.problemmode.value = initial;
 }
 // ]]>
 </script>