* Model::Cowrapper: fix error handling

diff --git a/src/newslash_web/lib/Newslash/Model/Cowrapper.pm b/src/newslash_web/lib/Newslash/Model/Cowrapper.pm
index cb0a3b7..ddbb199 100644 (file)
--- a/src/newslash_web/lib/Newslash/Model/Cowrapper.pm
+++ b/src/newslash_web/lib/Newslash/Model/Cowrapper.pm
@@ -716,7 +716,7 @@ EOSQL
     $sth->execute(@arguments);
     my $rs = $sth->fetchall_arrayref(+{});
     if (!defined $rs) {
-        $self->set_error("select failed", $dbh->{mysql_errorno});
+        $self->set_error("select failed", $dbh->errstr, $dbh->err);
         $dbh->disconnect();
         return;
     }