From fd212e91108050986e52ea2eb3b6446f67b0c0d4 Mon Sep 17 00:00:00 2001
From: Matthew Wilson <matt@plainblack.com>
Date: Thu, 13 Oct 2005 21:38:11 +0000
Subject: [PATCH] fixed user profile cache problem.

---
 lib/WebGUI/Session.pm | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/lib/WebGUI/Session.pm b/lib/WebGUI/Session.pm
index 78d69fa8b..4d03e54d6 100644
--- a/lib/WebGUI/Session.pm
+++ b/lib/WebGUI/Session.pm
@@ -24,6 +24,7 @@ use Tie::CPHash;
 use WebGUI::Config;
 use WebGUI::ErrorHandler;
 use WebGUI::Id;
+use WebGUI::Cache;
 use WebGUI::Setting;
 use WebGUI::SQL;
 use WebGUI::User;
@@ -413,7 +414,9 @@ Refreshes the user's information from the database into this user session.
 =cut
 
 sub refreshUserInfo {
-	_setupUserInfo($_[0]);
+	my $userId = shift;
+	WebGUI::Cache->new(["user",$userId])->delete;
+	_setupUserInfo($userId);
 	$session{isInGroup} = ();
 }