1package DBICTest::Schema::EventTZPg;
2
3use strict;
4use warnings;
5use base qw/DBICTest::BaseResult/;
6
7__PACKAGE__->load_components(qw/InflateColumn::DateTime/);
8
9__PACKAGE__->table('event');
10
11__PACKAGE__->add_columns(
12  id => { data_type => 'integer', is_auto_increment => 1 },
13  starts_at => { data_type => 'datetime', timezone => "America/Chicago", locale => 'de_DE' },
14  created_on => { data_type => 'timestamp with time zone', timezone => "America/Chicago" },
15  ts_without_tz => { data_type => 'timestamp without time zone' },
16);
17
18__PACKAGE__->set_primary_key('id');
19
20sub _datetime_parser {
21  require DateTime::Format::Pg;
22  DateTime::Format::Pg->new();
23}
24
251;
26