From f292b4b22df4b035de00e72a0c135e0e5756ece2 Mon Sep 17 00:00:00 2001
From: Yorhel <git@yorhel.nl>
Date: Fri, 17 Jul 2009 15:21:13 +0200
Subject: Check for the existance of QARG instead of it's value

---
 lib/POE/Component/Pg.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/POE/Component/Pg.pm b/lib/POE/Component/Pg.pm
index 27fb9b2..79687da 100644
--- a/lib/POE/Component/Pg.pm
+++ b/lib/POE/Component/Pg.pm
@@ -263,7 +263,7 @@ sub dbi_canread {
     if($@) {
       sendevent \@_, 'error', $item->[QACT], $@, $item->[QQUERY], $item->[QPARAM], $item->[QSESID], $item->[QARG];
     } elsif($item->[QEVENT]) {
-      $_[KERNEL]->post($item->[QSESID], $item->[QEVENT], $num, $res, $item->[QARG] ? $item->[QARG] : ());
+      $_[KERNEL]->post($item->[QSESID], $item->[QEVENT], $num, $res, exists $item->[QARG] ? $item->[QARG] : ());
     }
     $_[KERNEL]->refcount_decrement($item->[QSESID], 'P:C:PG');
 
-- 
cgit v1.2.3