--- loncom/xml/scripttag.pm	2000/10/10 18:18:26	1.20
+++ loncom/xml/scripttag.pm	2000/10/11 21:08:49	1.21
@@ -25,7 +25,7 @@ sub start_script {
   $Apache::scripttag::SCRIPT_RESULT='';
   if ($type eq "loncapa/perl") {
     $safeeval->share('$SCRIPT_RESULT');
-    my $bodytext=&Apache::lonxml::get_all_text("script",$$parser[$#$parser]);
+    my $bodytext=&Apache::lonxml::get_all_text("/script",$$parser[$#$parser]);
     
     if ( $target eq "modified" ) {
     }