[Bast-commits] r9565 - DBIx-Class/0.08/trunk/lib/DBIx/Class

[ribasushi at dev.catalyst.perl.org]

Author: ribasushi
Date: 2010-06-03 10:43:58 +0100 (Thu, 03 Jun 2010)
New Revision: 9565

Modified:
   DBIx-Class/0.08/trunk/lib/DBIx/Class/Row.pm
Log:
Better exception before actually fixing this error case altogether

Modified: DBIx-Class/0.08/trunk/lib/DBIx/Class/Row.pm
===================================================================
--- DBIx-Class/0.08/trunk/lib/DBIx/Class/Row.pm	2010-06-03 09:34:44 UTC (rev 9564)
+++ DBIx-Class/0.08/trunk/lib/DBIx/Class/Row.pm	2010-06-03 09:43:58 UTC (rev 9565)
@@ -135,7 +135,10 @@
   }
   else {
     my $us = $rsrc->source_name;
-    $self->throw_exception ("'$us' neither depends nor is depended on by '$relname', something is wrong...");
+    $self->throw_exception (
+      "Unable to determine relationship '$relname' direction from '$us', "
+    . "possibly due to a missing reverse-relationship on '$relname' to '$us'."
+    );
   }
 }