--- loncom/xml/scripttag.pm 2000/11/22 00:00:54 1.24
+++ loncom/xml/scripttag.pm 2000/12/08 20:53:45 1.27
@@ -41,8 +41,8 @@ sub start_script {
sub end_script {
my ($target,$token,$parstack,$parser,$safeeval)=@_;
- return '';
- #return $token->[2];
+# return '';
+ return $token->[2];
}
sub start_display {
@@ -56,7 +56,10 @@ sub start_display {
if ( $target eq "modified" ) {
}
my $result=&Apache::run::run($bodytext,$safeeval);
-
+ if ($target eq 'grade' ) {
+ # grade should produce no output
+ $result='';
+ }
if ($target eq "edit" ) {
$result =
"
<$token->[1]> output:
$bodytext
Source:
";
@@ -155,6 +158,7 @@ sub start_import {
$result.=&editfield($token->[1],$bodytext);
$result.="Clickhere to edit
"
}
+ return '';
}
sub end_import {