Blob Blame History Raw
From: bitcardbmw@lsmod.de

man Time::Local says

 Whenever possible, use an absolute four digit year instead.

With a detailed explanation about ambiguity of 2-digit years above that.

Please review/test/merge the attached patch (not tested)

Index: Date-ICal-2.678/lib/Date/ICal.pm
===================================================================
--- Date-ICal-2.678.orig/lib/Date/ICal.pm
+++ Date-ICal-2.678/lib/Date/ICal.pm
@@ -334,7 +334,7 @@ sub epoch {
 
         $epoch =
           timegm( $self->sec, $self->min, $self->hour, $self->day,
-          ( $self->month ) - 1, ( $self->year ) - 1900 );
+          ( $self->month ) - 1, $self->year);
     }
 
     return $epoch;