version 1.94, 2004/03/12 18:41:43
|
version 1.95, 2004/03/16 22:00:51
|
Line 632 sub pick_foil_for_concept {
|
Line 632 sub pick_foil_for_concept {
|
|
|
} |
} |
|
|
|
sub get_response_param { |
|
my ($id,$name,$default)=@_; |
|
my $parameter; |
|
if ($ENV{'request.state'} eq 'construct' && |
|
defined($Apache::inputtags::params{$name})) { |
|
$parameter=$Apache::inputtags::params{$name}; |
|
} else { |
|
$parameter=&Apache::lonnet::EXT("resource.$id.$name"); |
|
} |
|
if (!defined($parameter) || $parameter eq '') { |
|
$parameter = $default; |
|
} |
|
return $parameter; |
|
} |
|
|
1; |
1; |
__END__ |
__END__ |