From 07c7cf609893dbc9a8d9ab45f026cea7ad46f0d9 Mon Sep 17 00:00:00 2001 From: JT Smith Date: Sat, 14 Jan 2006 23:31:49 +0000 Subject: [PATCH] more bug fixes --- lib/WebGUI/Operation/Auth.pm | 2 +- lib/WebGUI/Session/DateTime.pm | 3 ++- 2 files changed, 3 insertions(+), 2 deletions(-) diff --git a/lib/WebGUI/Operation/Auth.pm b/lib/WebGUI/Operation/Auth.pm index 3ec830b27..57d2511e8 100644 --- a/lib/WebGUI/Operation/Auth.pm +++ b/lib/WebGUI/Operation/Auth.pm @@ -32,7 +32,7 @@ Get the instance of this object or create a new instance if none exists sub getInstance { my $session = shift; #Get Auth Settings - my $authMethod = $session->user->profileField("authMethod") || $session->setting->get("authMethod"); + my $authMethod = $session->user->get("authMethod") || $session->setting->get("authMethod"); $authMethod = $session->setting->get("authMethod") if($session->user->profileField("userId") eq '1'); $authMethod = $_[0] if($_[0] && isIn($_[0], @{$session->config->get("authMethods")})); my $userId = $_[1]; diff --git a/lib/WebGUI/Session/DateTime.pm b/lib/WebGUI/Session/DateTime.pm index 3749c513b..c30616cb3 100644 --- a/lib/WebGUI/Session/DateTime.pm +++ b/lib/WebGUI/Session/DateTime.pm @@ -622,7 +622,8 @@ A reference to the current session. sub new { my $class = shift; - bless {_session=>shift}, $class; + my $session = shift; + bless {_session=>$session}, $class; } #-------------------------------------------------------------------