version 1.39, 2002/11/07 19:45:16
|
version 1.42, 2002/11/14 16:47:41
|
Line 99 sub start_table {
|
Line 99 sub start_table {
|
} |
} |
$Apache::edit::colordepth++; |
$Apache::edit::colordepth++; |
push(@Apache::edit::inserttag,$token->[1]); |
push(@Apache::edit::inserttag,$token->[1]); |
my $result='<p align="right">'; |
my $result='<div align="right">'; |
$result.='<table bgcolor="'.$color.'" width="99%" border="2">'; |
$result.='<table bgcolor="'.$color.'" width="97%" border="0" cellspacing="5" cellpadding="3">'; |
return $result; |
return $result; |
} |
} |
|
|
sub end_table { |
sub end_table { |
$Apache::edit::colordepth--; |
$Apache::edit::colordepth--; |
my $result='</table></p>'; |
my $result='</table></div>'; |
$result.="<table><tr><td>"; |
$result.="<table><tr><td>"; |
|
|
my ($tagname,$closingtag); |
my ($tagname,$closingtag); |
Line 122 sub end_table {
|
Line 122 sub end_table {
|
return $result; |
return $result; |
} |
} |
|
|
sub start_spanning_row { return '<tr><td colspan="3">';} |
sub start_spanning_row { return '<tr><td colspan="3" bgcolor="#DDDDDD">';} |
sub start_row { return '<tr><td>'; } |
sub start_row { return '<tr><td bgcolor="#DDDDDD">'; } |
sub end_row { return '</td></tr>'; } |
sub end_row { return '</td></tr>'; } |
|
|
sub movebuttons { |
sub movebuttons { |
Line 518 sub select_or_text_arg {
|
Line 518 sub select_or_text_arg {
|
#----------------------------------------------------- browse |
#----------------------------------------------------- browse |
sub browse { |
sub browse { |
# insert a link to call up the filesystem browser (lonindexer) |
# insert a link to call up the filesystem browser (lonindexer) |
$_ = shift; |
my ($id, $mode) = @_; |
my $form = 'lonhomework'; |
my $form = 'lonhomework'; |
my $element = &Apache::lonnet::escape("$Apache::lonxml::curdepth.$_"); |
my $element; |
|
if (! defined($mode) || $mode eq 'attribute') { |
|
$element = &Apache::lonnet::escape("$Apache::lonxml::curdepth.$id"); |
|
} elsif ($mode eq 'textnode') { # for data between <tag> ... </tag> |
|
$element = &Apache::lonnet::escape('homework_edit_'. |
|
$Apache::lonxml::curdepth); |
|
} |
my $result = <<"ENDBUTTON"; |
my $result = <<"ENDBUTTON"; |
<a href=\"javascript:openbrowser('$form','$element')\"\>Browse</a> |
<a href=\"javascript:openbrowser('$form','$element')\"\>Browse</a> |
ENDBUTTON |
ENDBUTTON |