From 3a0ab33361c2be3119e65c9e0a41fd36aaa64729 Mon Sep 17 00:00:00 2001
From: Chris <chris@starforge.co.uk>
Date: Wed, 27 Jul 2011 23:15:59 +0100
Subject: [PATCH] Fixing missing 'my'.

---
 SessionHandler.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/SessionHandler.pm b/SessionHandler.pm
index 755f648..b9e0455 100644
--- a/SessionHandler.pm
+++ b/SessionHandler.pm
@@ -189,7 +189,7 @@ sub create_session {
         $autocheck -> execute(md5_hex($self -> {"autokey"}))
             or return set_error("Unable to peform key lookup query\nError was: ".$self -> {"dbh"} -> errstr);
 
-        $keyid = $autocheck -> fetchrow_hashref;
+        my $keyid = $autocheck -> fetchrow_hashref;
 
         # Do the key and user match? If so, fetch the user's data.
         $userdata = $self -> {"auth"} -> get_user_byid($self -> {"sessuser"}, 1)