[Catalyst-commits] r12789 - Catalyst-Controller-DBIC-API/1.004/trunk/lib/Catalyst/Controller/DBIC/API

[abraxxa at dev.catalyst.perl.org]

Author: abraxxa
Date: 2010-02-01 15:34:44 +0000 (Mon, 01 Feb 2010)
New Revision: 12789

Modified:
   Catalyst-Controller-DBIC-API/1.004/trunk/lib/Catalyst/Controller/DBIC/API/Base.pm
Log:
Try::Tiny puts the error in $_, not $@ like eval


Modified: Catalyst-Controller-DBIC-API/1.004/trunk/lib/Catalyst/Controller/DBIC/API/Base.pm
===================================================================
--- Catalyst-Controller-DBIC-API/1.004/trunk/lib/Catalyst/Controller/DBIC/API/Base.pm	2010-02-01 15:10:32 UTC (rev 12788)
+++ Catalyst-Controller-DBIC-API/1.004/trunk/lib/Catalyst/Controller/DBIC/API/Base.pm	2010-02-01 15:34:44 UTC (rev 12789)
@@ -431,7 +431,7 @@
     }
     catch
     {
-        $c->log->error($@);
+        $c->log->error($_);
         # send a generic error to the client to not give out infos about
         # the database schema
         $self->push_error($c, { message => 'a database error has occured.' });