From: Brandon Black <blblack@gmail.com>
Date: Tue, 14 Nov 2006 23:11:46 +0000 (+0000)
Subject: generate full class names in rel definitions (from victori)
X-Git-Tag: 0.03009~3
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=f5fc2ee814963e76db73cfc04d6690d570040d36;p=dbsrgits%2FDBIx-Class-Schema-Loader.git

generate full class names in rel definitions (from victori)
---

diff --git a/lib/DBIx/Class/Schema/Loader/RelBuilder.pm b/lib/DBIx/Class/Schema/Loader/RelBuilder.pm
index f4a503f..9b61371 100644
--- a/lib/DBIx/Class/Schema/Loader/RelBuilder.pm
+++ b/lib/DBIx/Class/Schema/Loader/RelBuilder.pm
@@ -194,7 +194,7 @@ sub generate_code {
             push(@{$all_code->{$local_class}},
                 { method => 'belongs_to',
                   args => [ $remote_relname,
-                            $remote_moniker,
+                            $remote_class,
                             \%cond,
                   ],
                 }
@@ -203,7 +203,7 @@ sub generate_code {
             push(@{$all_code->{$remote_class}},
                 { method => 'has_many',
                   args => [ $local_relname,
-                            $local_moniker,
+                            $local_class,
                             \%rev_cond,
                   ],
                 }