|
version 1.130, 2005/09/14 18:25:40
|
version 1.132, 2005/09/29 19:15:47
|
|
Line 308 sub start_window {
|
Line 308 sub start_window {
|
| } elsif ($target eq 'edit') { |
} elsif ($target eq 'edit') { |
| $result.=&Apache::edit::tag_start($target,$token); |
$result.=&Apache::edit::tag_start($target,$token); |
| $result.=&Apache::edit::text_arg('Text of Link:','linktext',$token,70); |
$result.=&Apache::edit::text_arg('Text of Link:','linktext',$token,70); |
| $result.=&Apache::edit::text_arg('Height:','width',$token,5); |
$result.=&Apache::edit::text_arg('Height:','height',$token,5); |
| $result.=&Apache::edit::text_arg('Width:','height',$token,5); |
$result.=&Apache::edit::text_arg('Width:','width',$token,5); |
| $result .=&Apache::edit::end_row().&Apache::edit::start_spanning_row(); |
$result .=&Apache::edit::end_row().&Apache::edit::start_spanning_row(); |
| } elsif ($target eq 'modified') { |
} elsif ($target eq 'modified') { |
| my $constructtag=&Apache::edit::get_new_args($token,$parstack, |
my $constructtag=&Apache::edit::get_new_args($token,$parstack, |
|
Line 501 sub xmlparse {
|
Line 501 sub xmlparse {
|
| @Apache::scripttag::parser_env; |
@Apache::scripttag::parser_env; |
| my @parser; |
my @parser; |
| &Apache::lonxml::newparser(\@parser,\$string); |
&Apache::lonxml::newparser(\@parser,\$string); |
| |
&Apache::lonxml::startredirection(); |
| my $result=&Apache::lonxml::inner_xmlparse($target,$tagstack, |
my $result=&Apache::lonxml::inner_xmlparse($target,$tagstack, |
| $parstack,\@parser, |
$parstack,\@parser, |
| $safeeval,$style); |
$safeeval,$style); |
| |
$result.=&Apache::lonxml::endredirection(); |
| &Apache::lonxml::debug("target is $target xmlparse recursion ending with $result"); |
&Apache::lonxml::debug("target is $target xmlparse recursion ending with $result"); |
| return $result; |
return $result; |
| } |
} |
![[BACK]](/icons/back.gif){kind=icon}
Return to scripttag.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / xml