1
2
3use strict;
4
5use Tangram::Type::Scalar;
6
7package Tangram::Type::TimeAndDate;
8
9use vars qw(@ISA);
10 @ISA = qw( Tangram::Type::String );
11
12$Tangram::Schema::TYPES{rawdatetime} = Tangram::Type::TimeAndDate->new;
13
14sub coldefs
15{
16    my ($self, $cols, $members, $schema) = @_;
17    $self->_coldefs($cols, $members, "DATETIME $schema->{sql}{default_null}");
18}
19
201;
21