Make "no_comments", the default for deploy
Jess Robinson [Wed, 12 Jul 2006 11:20:14 +0000 (11:20 +0000)]
lib/DBIx/Class/Storage/DBI.pm

index 84dc7b8..c020071 100644 (file)
@@ -1036,7 +1036,7 @@ L<DBIx::Class::Schema/deploy>.
 
 sub deploy {
   my ($self, $schema, $type, $sqltargs) = @_;
-  foreach my $statement ( $self->deployment_statements($schema, $type, undef, undef, $sqltargs) ) {
+  foreach my $statement ( $self->deployment_statements($schema, $type, undef, undef, { no_comments => 1, %$sqltargs }) ) {
     for ( split(";\n", $statement)) {
       next if($_ =~ /^--/);
       next if(!$_);