blob: fb04960150c006ca7d11de6d19b6114fd7461d3d (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
|
# temp fix for mp2-09... make a dummy Apache->request
require Apache::RequestUtil;
no warnings 'redefine';
my $sub = *Apache::request{CODE};
*Apache::request = sub {
my $r;
eval { $r = $sub->('Apache'); };
# warn $@ if $@;
return $r;
};
|