fix return value format

diff --git a/lib/Mubot4FB/DB.pm b/lib/Mubot4FB/DB.pm
index cb5b642..b939515 100644 (file)
--- a/lib/Mubot4FB/DB.pm
+++ b/lib/Mubot4FB/DB.pm
@@ -95,7 +95,7 @@ sub search_by_fb_post_id {
        my $sth = $me->{dbh}->prepare('select * from posts where fb_post_id = ?');
        $sth->bind_param(1, $db_args->{fb_post_id}, SQL_BIGINT);
        $sth->execute();
-       my $ret = $sth->fetchall_arrayref({});
+       my $ret = $sth->fetchrow_hashref();
        $sth->finish;
 
        return $ret;