@@ -, +, @@ --------- --- C4/Context.pm | 7 +------ 1 file changed, 1 insertion(+), 6 deletions(-) --- a/C4/Context.pm +++ a/C4/Context.pm @@ -80,18 +80,13 @@ BEGIN { # Redefine multi_param if cgi version is < 4.08 # Remove the "CGI::param called in list context" warning in this case + require CGI; # Can't check version without the require. if (!defined($CGI::VERSION) || $CGI::VERSION < 4.08) { - print STDERR "Low version\n"; - require CGI; # Can't check version without the require. - print STDERR "Is actually: $CGI::VERSION\n"; no warnings 'redefine'; *CGI::multi_param = \&CGI::param; use warnings 'redefine'; $CGI::LIST_CONTEXT_WARN = 0; } - else { - print STDERR "Okay version\n"; - } } # else there is no browser to send fatals to! } --