--- loncom/xml/scripttag.pm 2001/01/12 20:38:06 1.32 +++ loncom/xml/scripttag.pm 2001/02/19 20:43:00 1.33 @@ -28,7 +28,7 @@ sub start_script { &Apache::run::run($bodytext,$safeeval); } elsif ($target eq "edit" ) { &Apache::run::run($bodytext,$safeeval); - $result="
<$token->[1]> output:
$bodytext
Source:
"; + $result="
<$token->[1]> output:
$bodytext
Source:
"; $result.=&editfield($token->[1],$bodytext); } } else { @@ -66,7 +66,7 @@ sub start_display { } if ($target eq "edit" ) { $result = - "
<$token->[1]> output:
$bodytext
Source:
"; + "
<$token->[1]> output:
$bodytext
Source:
"; $result.=&editfield($token->[1],$bodytext); } return $result; @@ -90,7 +90,7 @@ sub start_scriptlib { return ""; } &Apache::run::run($script,$safeeval); - #&Apache::lonxml::debug("ran $bodytext:
".&Apache::lonnet::getfile($bodytext)."
"); + #&Apache::lonxml::debug("ran $bodytext:
".&Apache::lonnet::getfile($bodytext)."
"); if ($target eq "edit" ) { $result.=&editfield($token->[1],$bodytext); @@ -169,7 +169,7 @@ sub start_import { if ($target eq "edit" ) { $result.=&editfield($token->[1],$bodytext); - $result.="Clickhere to edit

" + $result.="Clickhere to edit
" } return ''; } @@ -201,7 +201,7 @@ sub editfield { if (length($_) > $maxlength) { $maxlength = length ($_); } } split ("\n", $data); - return "

\n<$tag>

\n   

\n</$tag>

\n"; + return "
\n<$tag>
\n   
\n</$tag>
\n"; } sub getfilenothere {