At the very least, here's a patch to quench the "undefined value...regex
match operation' warnings on columns that don't have a data_type defined.

-=Chris
--- DateTime.pm.orig	Thu Jun 08 14:10:10 2006
+++ DateTime.pm	Thu Jun 08 14:25:26 2006
@@ -48,7 +48,7 @@
 sub register_column {
   my ($self, $column, $info, @rest) = @_;
   $self->next::method($column, $info, @rest);
-  if ($info->{data_type} =~ /^datetime$/i) {
+  if (exists($info->{data_type}) && $info->{data_type} =~ /^datetime$/i) {
     $self->inflate_column(
       $column =>
         {

Attachment: signature.asc
Description: OpenPGP digital signature

_______________________________________________
List: http://lists.rawmode.org/cgi-bin/mailman/listinfo/dbix-class
Wiki: http://dbix-class.shadowcatsystems.co.uk/
IRC: irc.perl.org#dbix-class
SVN: http://dev.catalyst.perl.org/repos/bast/trunk/DBIx-Class/
Searchable Archive: http://www.mail-archive.com/[email protected]/

Reply via email to