extra $
This commit is contained in:
parent
55d73e193a
commit
d550fbd7b3
2 changed files with 2 additions and 2 deletions
|
|
@ -81,7 +81,7 @@ sub getHeader {
|
|||
my $status = getStatus();
|
||||
if($session{env}{MOD_PERL}) {
|
||||
my $r;
|
||||
if ($$mod_perl::VERSION >= 1.999023) {
|
||||
if ($mod_perl::VERSION >= 1.999023) {
|
||||
$r = Apache2::RequestUtil->request;
|
||||
} else {
|
||||
$r = Apache->request;
|
||||
|
|
|
|||
|
|
@ -119,7 +119,7 @@ sub _setupUserInfo {
|
|||
$session{user} = \%user;
|
||||
if ($session{env}{MOD_PERL}) {
|
||||
my $r;
|
||||
if ($$mod_perl::VERSION >= 1.999023) {
|
||||
if ($mod_perl::VERSION >= 1.999023) {
|
||||
$r = Apache2::RequestUtil->request;
|
||||
} else {
|
||||
$r = Apache->request;
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue