|
version 1.123, 2009/06/28 19:40:41
|
version 1.126, 2010/06/04 23:03:55
|
|
Line 26
|
Line 26
|
| # http://www.lon-capa.org/ |
# http://www.lon-capa.org/ |
| # |
# |
| |
|
| |
=pod |
| |
|
| =head1 NAME |
=head1 NAME |
| |
|
| Apache::edit - edit mode helpers |
Apache::edit - edit mode helpers |
|
Line 202 sub start_table {
|
Line 204 sub start_table {
|
| $Apache::edit::colordepth++; |
$Apache::edit::colordepth++; |
| push(@Apache::edit::inserttag,$token->[1]); |
push(@Apache::edit::inserttag,$token->[1]); |
| my $result='<div align="right">'; |
my $result='<div align="right">'; |
| $result.='<table bgcolor="'.$color.'" width="97%" border="0" cellspacing="5" cellpadding="3">'; |
$result.='<table bgcolor="'.$color.'" width="97%" border="0" cellspacing="3" cellpadding="2">'; |
| return $result; |
return $result; |
| } |
} |
| |
|
|
Line 230 sub end_table {
|
Line 232 sub end_table {
|
| return $result; |
return $result; |
| } |
} |
| |
|
| sub start_spanning_row { return '<tr><td colspan="5" bgcolor="#DDDDDD">';} |
sub start_spanning_row { return '<tr><td colspan="5" bgcolor="#F0F0F0">';} |
| sub start_row { return '<tr><td bgcolor="#DDDDDD">'; } |
sub start_row { return '<tr><td bgcolor="#DDDDDD">'; } |
| sub end_row { return '</td></tr>'; } |
sub end_row { return '</td></tr>'; } |
| |
|
|
Line 355 sub do_insert {
|
Line 357 sub do_insert {
|
| my $depth = scalar(@Apache::lonxml::depthcounter); |
my $depth = scalar(@Apache::lonxml::depthcounter); |
| $depth -- if ($after); |
$depth -- if ($after); |
| my $inset = "\t"x$depth; |
my $inset = "\t"x$depth; |
| $result.="\n$inset<$newtag>\n$inset</$newtag>"; |
$result.="\n$inset<$newtag></$newtag>"; |
| } else { |
} else { |
| if (defined(&$func)) { |
if (defined(&$func)) { |
| { |
{ |
![[BACK]](/icons/back.gif){kind=icon}
Return to edit.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / homework