Return to scripttag.pm CVS log | Up to [LON-CAPA] / loncom / xml |
version 1.65, 2002/01/21 16:41:31 | version 1.66, 2002/01/30 16:04:04 |
---|---|
Line 79 sub start_script { | Line 79 sub start_script { |
$result.=&Apache::edit::editfield($token->[1],$bodytext,'',50,4); | $result.=&Apache::edit::editfield($token->[1],$bodytext,'',50,4); |
} | } |
} else { | } else { |
if ($target ne "meta") { $result = $token->[4]; } | if ($target ne "meta") { |
$result = $token->[4]; | |
my $bodytext=&Apache::lonxml::get_all_text("/script",$$parser[$#$parser]); | |
$result.=$bodytext; | |
} | |
} | } |
return $result; | return $result; |
} | } |