Index: Base.pm
===================================================================
--- Base.pm	(revision 2211)
+++ Base.pm	(working copy)
@@ -493,11 +493,11 @@
             $self->_dbic_stmt($table_class,'add_columns',@$cols);
         }
         else {
-            my %cols_hash;
+            my @cols_array;
             foreach my $col (@$cols) {
-                $cols_hash{$col} = \%{($col_info->{$col})};
+                push(@cols_array, [ $col => \%{($col_info->{$col})} ] );
             }
-            $self->_dbic_stmt($table_class,'add_columns',%cols_hash);
+            $self->_dbic_stmt($table_class,'add_columns',map {@$_} @cols_array);
         }
 
         my $pks = $self->_table_pk_info($table) || [];