version 1.50, 2001/11/09 20:20:45
|
version 1.51, 2001/11/12 20:27:28
|
Line 16 sub start_response {
|
Line 16 sub start_response {
|
my ($parstack,$safeeval)=@_; |
my ($parstack,$safeeval)=@_; |
my $id= &Apache::lonxml::get_param('id',$parstack,$safeeval); |
my $id= &Apache::lonxml::get_param('id',$parstack,$safeeval); |
if ($id eq '') { $id = $Apache::lonxml::curdepth; } |
if ($id eq '') { $id = $Apache::lonxml::curdepth; } |
|
if ($#Apache::inputtags::import > -1) { |
|
&Apache::lonxml::debug("Turning :$id: into"); |
|
$id = join('_',@Apache::inputtags::import).'_'.$id; |
|
&Apache::lonxml::debug("New :$id:"); |
|
} |
push (@Apache::inputtags::response,$id); |
push (@Apache::inputtags::response,$id); |
push (@Apache::inputtags::responselist,$id); |
push (@Apache::inputtags::responselist,$id); |
@Apache::inputtags::inputlist=(); |
@Apache::inputtags::inputlist=(); |