version 1.74, 2004/04/23 15:43:41
|
version 1.75, 2004/04/23 19:39:25
|
Line 279 sub loadmap {
|
Line 279 sub loadmap {
|
} else { |
} else { |
$hash{'param_'.$referid}=''.$newparam; |
$hash{'param_'.$referid}=''.$newparam; |
} |
} |
if ($token->[2]->{'name'} eq 'parameter_mapalias') { |
if ($token->[2]->{'name'}=~/^parameter_(0_)*mapalias$/) { |
$hash{'mapalias_'.$token->[2]->{'value'}}=$referid; |
$hash{'mapalias_'.$token->[2]->{'value'}}=$referid; |
} |
} |
if ($token->[2]->{'name'} eq 'parameter_randompick') { |
if ($token->[2]->{'name'}=~/^parameter_(0_)*randompick$/) { |
$randompick{$referid}=$token->[2]->{'value'}; |
$randompick{$referid}=$token->[2]->{'value'}; |
} |
} |
if ($token->[2]->{'name'} eq 'parameter_randompickseed') { |
if ($token->[2]->{'name'}=~/^parameter_(0_)*randompickseed$/) { |
$randompick{$referid}=$token->[2]->{'value'}; |
$randompick{$referid}=$token->[2]->{'value'}; |
} |
} |
if ($token->[2]->{'name'} eq 'parameter_encrypturl') { |
if ($token->[2]->{'name'}=~/^parameter_(0_)*encrypturl$/) { |
if ($token->[2]->{'value'}=~/^yes$/i) { |
if ($token->[2]->{'value'}=~/^yes$/i) { |
$encurl{$referid}=1; |
$encurl{$referid}=1; |
} |
} |
} |
} |
if ($token->[2]->{'name'} eq 'parameter_hiddenresource') { |
if ($token->[2]->{'name'}=~/^parameter_(0_)*hiddenresource$/) { |
if ($token->[2]->{'value'}=~/^yes$/i) { |
if ($token->[2]->{'value'}=~/^yes$/i) { |
$hiddenurl{$referid}=1; |
$hiddenurl{$referid}=1; |
} |
} |