svnno****@sourc*****
svnno****@sourc*****
2008年 3月 13日 (木) 16:55:16 JST
SRADRevision: 549
http://svn.sourceforge.jp/cgi-bin/viewcvs.cgi?root=slashdotjp&view=rev&rev=549
Author: tach
Date: 2008-03-13 16:55:15 +0900 (Thu, 13 Mar 2008)
Log Message:
-----------
move processing %special keys to after encode changing at filter_params
Modified Paths:
--------------
slashjp/branches/2.5.0.192/Slash/Utility/Environment/Environment.pm
-------------- next part --------------
Modified: slashjp/branches/2.5.0.192/Slash/Utility/Environment/Environment.pm
===================================================================
--- slashjp/branches/2.5.0.192/Slash/Utility/Environment/Environment.pm 2008-03-12 06:32:27 UTC (rev 548)
+++ slashjp/branches/2.5.0.192/Slash/Utility/Environment/Environment.pm 2008-03-13 07:55:15 UTC (rev 549)
@@ -1960,8 +1960,6 @@
$data = fixint($data);
} elsif (exists $alphas{$key}) {
$data =~ s|[^a-zA-Z0-9_]+||g;
- } elsif (exists $special{$key}) {
- $special{$key}->($data);
} else {
for my $ri (@regints) {
$data = fixint($data) if $ri =~ $key;
@@ -1979,6 +1977,9 @@
}
}
}
+ if (exists $special{$key}) {
+ $special{$key}->($data);
+ }
return $data;
}