X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FDateTime%2FEpoch.pm;fp=lib%2FDBIx%2FClass%2FDateTime%2FEpoch.pm;h=ee14d26fee417b3d68ae0c002fc750d3ffe76c3c;hb=06edd8edcdfa7bc868c059770804147cb14eba04;hp=a7192330a3b94ca6318a36e313b651d942090c62;hpb=62ab116996e66bb2f6b896df4b9dd6c2a7dddae3;p=dbsrgits%2FDBIx-Class-DateTime-Epoch.git

diff --git a/lib/DBIx/Class/DateTime/Epoch.pm b/lib/DBIx/Class/DateTime/Epoch.pm
index a719233..ee14d26 100644
--- a/lib/DBIx/Class/DateTime/Epoch.pm
+++ b/lib/DBIx/Class/DateTime/Epoch.pm
@@ -3,7 +3,7 @@ package DBIx::Class::DateTime::Epoch;
 use strict;
 use warnings;
 
-our $VERSION = '0.05';
+our $VERSION = '0.06';
 
 use base qw( DBIx::Class );
 
@@ -39,7 +39,7 @@ sub add_columns {
 sub _inflate_to_datetime {
     my( $self, $value, $info, @rest ) = @_;
     $self->next::method( $value, $info, @rest )
-        unless $info->{ data_type } =~ m{int} || $info->{ inflate_datetime } eq 'epoch';
+        unless $info->{ data_type } =~ m{int}i || $info->{ inflate_datetime } eq 'epoch';
 
     return DateTime->from_epoch( epoch => $value );
 }
@@ -47,7 +47,7 @@ sub _inflate_to_datetime {
 sub _deflate_from_datetime {
     my( $self, $value, $info, @rest ) = @_;
     $self->next::method( $value, $info, @rest )
-        unless $info->{ data_type } =~ m{int} || $info->{ inflate_datetime } eq 'epoch';
+        unless $info->{ data_type } =~ m{int}i || $info->{ inflate_datetime } eq 'epoch';
 
     return $value->epoch;
 }
@@ -134,11 +134,11 @@ Overrides column deflation to call C<epoch()> on the column value.
 
 =over 4
 
-=item * DBIx::Class
+=item * L<DBIx::Class>
 
-=item * DBIx::Class::TimeStamp
+=item * L<DBIx::Class::TimeStamp>
 
-=item * DateTime
+=item * L<DateTime>
 
 =back
 
@@ -150,7 +150,7 @@ Adam Paynter E<lt>adapay@cpan.orgE<gt>
 
 =head1 COPYRIGHT AND LICENSE
 
-Copyright 2006-2009 by Brian Cassidy
+Copyright 2006-2010 by Brian Cassidy
 
 This library is free software; you can redistribute it and/or modify
 it under the same terms as Perl itself.