From: timriker <timriker@c11ca15a-4712-0410-83d8-924469b57eb5>
Date: Mon, 4 Nov 2002 06:56:16 +0000 (+0000)
Subject: randKey dbm fix
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=29ad884d69132fb6f98763b9b78b83b76a974b64;p=infobot.git

randKey dbm fix


git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk@604 c11ca15a-4712-0410-83d8-924469b57eb5
---

diff --git a/blootbot/src/db_dbm.pl b/blootbot/src/db_dbm.pl
index 3bfd992..1242cea 100644
--- a/blootbot/src/db_dbm.pl
+++ b/blootbot/src/db_dbm.pl
@@ -329,7 +329,7 @@ sub randKey {
 
     my $rand = int(rand(&countKeys($table) - 1));
     my @keys = keys %{$table};
-    &dbGet($table, '$select', "@format[0]=@keys[$rand]");
+    &dbGet($table, '$select', "$format[0]=$keys[$rand]");
 }
 
 #####