added t/lib/DBICTest/Schema/EventTZWarning.pm ghpr/closed/inspiring_eef9b484
hisaichi5518 [Tue, 18 Jun 2013 05:49:48 +0000 (14:49 +0900)]
t/lib/DBICTest/Schema/EventTZWarning.pm [new file with mode: 0644]

diff --git a/t/lib/DBICTest/Schema/EventTZWarning.pm b/t/lib/DBICTest/Schema/EventTZWarning.pm
new file mode 100644 (file)
index 0000000..2a0ab57
--- /dev/null
@@ -0,0 +1,29 @@
+package DBICTest::Schema::EventTZWarning;
+
+use strict;
+use warnings;
+
+use base qw/DBICTest::BaseResult/;
+
+__PACKAGE__->load_components(qw/InflateColumn::DateTime/);
+
+__PACKAGE__->table('event_tz_warning');
+
+__PACKAGE__->add_columns(
+  id => { data_type => 'integer', is_auto_increment => 1 },
+  starts_at => {
+    data_type => 'datetime',
+    time_zone => "America/Chicago",
+    locale    => 'de_DE',
+  },
+);
+
+__PACKAGE__->set_primary_key('id');
+
+sub _datetime_parser {
+  require DateTime::Format::MySQL;
+  DateTime::Format::MySQL->new();
+}
+
+
+1;