diff options
| author | fukachan <fukachan> | 2003-08-24 14:11:10 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2003-08-24 14:11:10 +0000 |
| commit | 719e47d718d1740463af2084956b0ea60a8d2d02 (patch) | |
| tree | 695339734d79ffd77dda46f12447bbe5401d171f /fml/lib/FML/Process | |
| parent | 7beb52130aff7fa6cef84ea887b8adb400f966e6 (diff) | |
| download | fml8-719e47d718d1740463af2084956b0ea60a8d2d02.tar.gz fml8-719e47d718d1740463af2084956b0ea60a8d2d02.tar.bz2 fml8-719e47d718d1740463af2084956b0ea60a8d2d02.zip | |
remove debug
Diffstat (limited to 'fml/lib/FML/Process')
| -rw-r--r-- | fml/lib/FML/Process/CGI/Param.pm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/fml/lib/FML/Process/CGI/Param.pm b/fml/lib/FML/Process/CGI/Param.pm index 0658b722..1c836632 100644 --- a/fml/lib/FML/Process/CGI/Param.pm +++ b/fml/lib/FML/Process/CGI/Param.pm @@ -4,7 +4,7 @@ # All rights reserved. This program is free software; you can # redistribute it and/or modify it under the same terms as Perl itself. # -# $FML: Param.pm,v 1.18 2002/09/22 14:56:55 fukachan Exp $ +# $FML: Param.pm,v 1.19 2002/12/22 03:46:21 fukachan Exp $ # package FML::Process::CGI::Param; @@ -102,7 +102,6 @@ sub safe_paramlist # match method and return ARRAY_REF with matching values $key = $safe_method_regexp->{ $key }; for my $x (param()) { - print STDERR "\n<!-- check param: $x =~ /^$key$/ -->\n"; if ($x =~ /^$key$/) { my $value = defined param($x) ? param($x) : ''; if ($numregexp == 1) { push(@list, [ $1, $value ] );} |