From: Jess Robinson <castaway@desert-island.me.uk>
Date: Mon, 19 Jun 2006 06:56:08 +0000 (+0000)
Subject: deployment_statements ensures_connected, this to stop the confusion etc over incorrec... 
X-Git-Tag: v0.07002~75^2~103
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=915919c594620a5440f01ee2e271c102f7613cc8;p=dbsrgits%2FDBIx-Class.git

deployment_statements ensures_connected, this to stop the confusion etc over incorrect sqlt_types
---

diff --git a/lib/DBIx/Class/Storage/DBI.pm b/lib/DBIx/Class/Storage/DBI.pm
index 029e216..5ddf478 100644
--- a/lib/DBIx/Class/Storage/DBI.pm
+++ b/lib/DBIx/Class/Storage/DBI.pm
@@ -914,6 +914,8 @@ L<DBIx::Class::Schema/deploy>.
 
 sub deployment_statements {
   my ($self, $schema, $type, $version, $dir, $sqltargs) = @_;
+  # Need to be connected to get the correct sqlt_type
+  $elf->ensure_connected();
   $type ||= $self->sqlt_type;
   $version ||= $schema->VERSION || '1.x';
   $dir ||= './';