version 1.41, 2002/11/11 22:37:23
|
version 1.42, 2002/11/14 16:47:41
|
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 |