View | Details | Raw Unified | Return to bug 15809
Collapse All | Expand All

(-)a/C4/Context.pm (-1 / +9 lines)
Lines 76-81 BEGIN { Link Here
76
		if ($ENV{KOHA_BACKTRACES}) {
76
		if ($ENV{KOHA_BACKTRACES}) {
77
			$main::SIG{__DIE__} = \&CGI::Carp::confess;
77
			$main::SIG{__DIE__} = \&CGI::Carp::confess;
78
		}
78
		}
79
80
        # Redefine multi_param if cgi version is < 4.08
81
        # Remove the "CGI::param called in list context" warning in this case
82
        if (!defined($CGI::VERSION) || $CGI::VERSION < 4.08) {
83
            no warnings 'redefine';
84
            *CGI::multi_param = \&CGI::param;
85
            use warnings 'redefine';
86
            $CGI::LIST_CONTEXT_WARN = 0;
87
        }
79
    }  	# else there is no browser to send fatals to!
88
    }  	# else there is no browser to send fatals to!
80
89
81
    # Check if there are memcached servers set
90
    # Check if there are memcached servers set
82
- 

Return to bug 15809