--- loncom/homework/structuretags.pm	2003/08/14 14:25:54	1.206
+++ loncom/homework/structuretags.pm	2003/08/30 02:33:25	1.207
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA 
 # definition of tags that give a structure to a document
 #
-# $Id: structuretags.pm,v 1.206 2003/08/14 14:25:54 sakharuk Exp $
+# $Id: structuretags.pm,v 1.207 2003/08/30 02:33:25 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -72,7 +72,7 @@ sub end_tex {
 sub page_start {
     my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_;
     my %found;
-    foreach my $taginside ($tagstack) {
+    foreach my $taginside (@$tagstack) {
 	foreach my $taglookedfor ('html','body','form') {
 	    if ($taginside =~ /^$taglookedfor$/i) {$found{$taglookedfor} = 1;}
 	}