save work

META6.json

@@ -7,6 +7,7 @@
   ],
   "depends": [
     "Date::Utils",
+    "LocalTime",
     "Timezones::US"
   ],
   "description": "Provides time zone and Daylight Saving Time (DST) infomation for US states and territories",

dev/run.raku

@@ -4,9 +4,10 @@ use lib <../lib>;
 use DateTime::US;
 
 my $tz = DateTime::US.new: :timezone('cst');
-dd $tz;
 
-say $tz.begin-dst;
+my $year = 2024;
+say $tz.dst-begin: :$year;
+say $tz.dst-end: :$year;
 
 =finish
 

lib/DateTime/US.rakumod

@@ -1,5 +1,6 @@
 unit class DateTime::US;
 
+use LocalTime;
 use Timezones::US;
 use Date::Utils;
 
@@ -77,14 +78,16 @@ multi method dst-begin(:$year! --> DateTime) {
     my $nth   = 2;
     my $dow   = 7;
     my $month = 3;
-    nth-dow-in-month :$year, :$month, :$nth; #:nDate.new: :$year, :month(3);
+    my $date = nth-dow-in-month :$year, :$month, :$nth, :$dow;
+    DateTime.new: :$year, :$month, :day($date.day), :hour(2);
 }
 
 multi method dst-end(:$year --> DateTime) {
     # nth(1) dow(7) in month 11 at 0200 local
     my $nth   = 1;
     my $dow   = 7;
     my $month = 11;
-    nth-dow-in-month :$year, :$month, :$nth; #:nDate.new: :$year, :month(3);
+    my $date = nth-dow-in-month :$year, :$month, :$nth, :$dow;
+    DateTime.new: :$year, :$month, :day($date.day), :hour(2);
 }