From d550fbd7b38a69b9468f73b234d61316d3d20392 Mon Sep 17 00:00:00 2001 From: JT Smith Date: Mon, 23 May 2005 20:26:26 +0000 Subject: [PATCH] extra $ --- lib/WebGUI/HTTP.pm | 2 +- lib/WebGUI/Session.pm | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/WebGUI/HTTP.pm b/lib/WebGUI/HTTP.pm index bc570d7b7..790d73773 100644 --- a/lib/WebGUI/HTTP.pm +++ b/lib/WebGUI/HTTP.pm @@ -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; diff --git a/lib/WebGUI/Session.pm b/lib/WebGUI/Session.pm index 7d936339c..9c4e971bf 100644 --- a/lib/WebGUI/Session.pm +++ b/lib/WebGUI/Session.pm @@ -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;