--- loncom/homework/structuretags.pm	2003/04/03 22:25:49	1.165
+++ loncom/homework/structuretags.pm	2003/04/21 20:59:02	1.166
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA 
 # definition of tags that give a structure to a document
 #
-# $Id: structuretags.pm,v 1.165 2003/04/03 22:25:49 albertel Exp $
+# $Id: structuretags.pm,v 1.166 2003/04/21 20:59:02 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -271,6 +271,11 @@ sub start_problem {
     @Apache::structuretags::whileconds=();
     @Apache::structuretags::whilebody=();
     @Apache::structuretags::whileline=();
+    $Apache::lonhomework::scantronmode=0;
+
+    if (defined($ENV{'scantron.maxquest'})) {
+	$Apache::lonhomework::scantronmode=1;
+    }
 
     if ($target ne 'analyze') {
 	&initialize_storage();