--- loncom/xml/style.pm	2000/07/20 15:37:54	1.5
+++ loncom/xml/style.pm	2000/10/26 14:01:40	1.6
@@ -33,7 +33,13 @@ sub styleparser {
        while ($stoken = $pstyle->get_token and $stoken->[1] ne 'definetag') { 
 	    if ($stoken->[0] eq 'S' and $stoken->[1] eq 'meta') {
 	      while ($stoken = $pstyle->get_token and $stoken->[1] ne 'meta') {
-		   $current_value .= $stoken->[1];
+                   if ($stoken->[0] eq 'T') {	
+                            $current_value .= $stoken->[1];
+		   } elsif ($stoken->[0] eq 'S') {	
+                            $current_value .= $stoken->[4];
+		   } else {
+                            $current_value .= $stoken->[2];
+		   }
 	      }
 	    }
        }