typer
typer****@cubic*****
2003年 6月 24日 (火) 22:22:34 JST
Fork書きわすれがありました。
このプラグインではCGIパラメータ名のリストを取得していますが、
CGI2::paramでは取得できなかったので、CGI::paramを呼んでいます。
これはCGI2::paramを引数なしで呼んでも、CGI::paramを引数付(しかしundef)
で呼ぶためです。
これは以下のパッチで対応できるとおもいます。
--- lib/CGI2.pm.orig Thu Jun 12 12:22:32 2003
+++ lib/CGI2.pm Sun Jun 22 02:38:34 2003
@@ -27,12 +27,13 @@
my $value = shift;
if(!Util::handyphone()){
+ return $self->CGI::param unless $name;
return $self->CGI::param($name,$value);
}
if(defined($value)){
$self->CGI::param($name,$value);
- } else {
+ } elsif(defined($name)) {
my @values = $self->CGI::param($name);
if(!defined(@values)){
return undef;
@@ -49,5 +50,7 @@
&jcode::convert(\$value,"euc");
return $value;
}
+ } else {
+ return $self->CGI::param;
}
}
--
typer tyepr****@cubic*****
Noboru Katoh typer****@goenn*****
gpg key(new) = 836E BAC6 9050 EEC7 01F7 9F1E EC1C 3259 2ED0 9FB2
gpg key(old) = 1915 B6D2 4761 E104 1046 BF4C 8E0C 7FA5 9EC3 7180