From 584113884a8e2551f92404850c94d6311442839f Mon Sep 17 00:00:00 2001
From: timriker <timriker@c11ca15a-4712-0410-83d8-924469b57eb5>
Date: Fri, 22 Nov 2002 00:08:24 +0000
Subject: [PATCH] fix death

git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk@674 c11ca15a-4712-0410-83d8-924469b57eb5
---
 blootbot/src/dbi.pl | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

diff --git a/blootbot/src/dbi.pl b/blootbot/src/dbi.pl
index fb20e3c..0c9a3f5 100644
--- a/blootbot/src/dbi.pl
+++ b/blootbot/src/dbi.pl
@@ -179,12 +179,15 @@ sub dbGetColNiceHash {
 	return;
     }
 
-    # FIXME this dies hard if there are no results
-    %retval = %{ $sth->fetchrow_hashref };
+    my $retval = $sth->fetchrow_hashref();
 
     $sth->finish;
 
-    return %retval;
+    if ($retval) {
+	return %{$retval};
+    } else {
+	return;
+    }
 }
 
 ####
-- 
2.39.5