initialize result_component_map to empty hash if unset

[dbsrgits/DBIx-Class-Schema-Loader.git] / lib / DBIx / Class / Schema / Loader / Base.pm

diff --git a/lib/DBIx/Class/Schema/Loader/Base.pm b/lib/DBIx/Class/Schema/Loader/Base.pm
index 0a854ae..6eaaddc 100644 (file)
--- a/lib/DBIx/Class/Schema/Loader/Base.pm
+++ b/lib/DBIx/Class/Schema/Loader/Base.pm
@@ -621,6 +621,9 @@ sub new {
         }
         $self->result_component_map(\%rc_map);
     }
+    else {
+        $self->result_component_map({});
+    }
     $self->_validate_result_component_map;
 
     if ($self->use_moose) {