--- CBOR-XS/XS.pm	2013/12/10 15:31:40	1.39
+++ CBOR-XS/XS.pm	2014/01/05 14:24:54	1.40
@@ -66,7 +66,7 @@
 
 use common::sense;
 
-our $VERSION = 1.12;
+our $VERSION = 1.25;
 our @ISA = qw(Exporter);
 
 our @EXPORT = qw(encode_cbor decode_cbor);
@@ -1138,7 +1138,7 @@
 }
 
 sub Time::Piece::TO_CBOR {
-   tag 1, $_[0]->epoch
+   tag 1, 0 + $_[0]->epoch
 }
 
 XSLoader::load "CBOR::XS", $VERSION;