From 3dfcda69ead95ea9632d38b36ffb8b07be3a3654 Mon Sep 17 00:00:00 2001
From: Mark A <andemark@a-iot1t.uch.ad.pvt>
Date: Sun, 5 Sep 2021 09:50:58 -0600
Subject: ch-2.raku fixed

---
 challenge-128/mark-anderson/raku/ch-2.raku | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/challenge-128/mark-anderson/raku/ch-2.raku b/challenge-128/mark-anderson/raku/ch-2.raku
index 674478d75e..0cf05bb73d 100644
--- a/challenge-128/mark-anderson/raku/ch-2.raku
+++ b/challenge-128/mark-anderson/raku/ch-2.raku
@@ -34,7 +34,7 @@ sub minimum-platforms($arrivals, $departures)
 
     while @arrivals
     {
-        if @arrivals.head < @departures.head
+        if @arrivals.head <= @departures.head
         {
             @arrivals.shift;
             $result = max $result, ++$platforms;
@@ -55,7 +55,7 @@ sub minimum-platforms($arrivals, $departures)
         has Str $.time;
     }
 
-    multi infix:« < »(dt $a, dt $b) 
+    multi infix:<< <= >>(dt $a, dt $b) 
     {
         my $r = $a.day <=> $b.day;
 
-- 
cgit