Blob Blame History Raw
--- c/leap_seconds.h
+++ c/leap_seconds.h
@@ -62,8 +62,10 @@
       ls = 24;                      \
     } else if (utc_rd >= 734685 && utc_rd < 735780) {  \
       ls = 25;                      \
+    } else if (utc_rd >= 735780 && utc_rd < 736330) {  \
+      ls = 26;                      \
     } else {                         \
-      ls = 26;       \
+      ls = 27;       \
     }                              \
   }                                \
 }
@@ -99,6 +101,7 @@
       case 733407: es = 1; break;            \
       case 734684: es = 1; break;            \
       case 735779: es = 1; break;            \
+      case 736329: es = 1; break;            \
     }                                  \
   }                                    \
 }
@@ -134,6 +137,7 @@
       case 733407: dl = 86400 + 1; break;    \
       case 734684: dl = 86400 + 1; break;    \
       case 735779: dl = 86400 + 1; break;    \
+      case 736329: dl = 86400 + 1; break;    \
     }                                  \
   }                                    \
 }
--- leaptab.txt
+++ leaptab.txt
@@ -24,3 +24,4 @@
 2009  Jan. 1  +1
 2012  Jul. 1  +1
 2015  Jul. 1  +1
+2017  Jan. 1  +1
--- lib/DateTime/LeapSecond.pm
+++ lib/DateTime/LeapSecond.pm
@@ -109,6 +109,8 @@ sub _initialize {
             2006  Jan. 1  +1
             2009  Jan. 1  +1
             2012  Jun. 1  +1
+            2015  Jul. 1  +1
+            2017  Jan. 1  +1
             )
     );
 }
--- t/19leap-second.t
+++ t/19leap-second.t
@@ -1156,6 +1156,8 @@ use DateTime;
         [ 2005, 12, 31 ],
         [ 2008, 12, 31 ],
         [ 2012, 6,  30 ],
+        [ 2015, 6,  30 ],
+        [ 2016, 12, 31 ],
         ) {
         my $formatted = join '-', map { sprintf( '%02d', $_ ) } @{$date};
 
--- t/release-pp-19leap-second.t
+++ t/release-pp-19leap-second.t
@@ -1168,6 +1168,8 @@ use DateTime;
         [ 2005, 12, 31 ],
         [ 2008, 12, 31 ],
         [ 2012, 6,  30 ],
+        [ 2015, 6,  30 ],
+        [ 2016, 12, 31 ],
         ) {
         my $formatted = join '-', map { sprintf( '%02d', $_ ) } @{$date};