From f363cf9c1e7bc64f99ac7a8f968ffa178a51482f Mon Sep 17 00:00:00 2001
From: "Markus \"Holli\" Holzer" <holli.holzer@gmail.com>
Date: Mon, 3 Feb 2020 21:16:57 +0100
Subject: be gone special case

---
 challenge-046/markus-holzer/raku/ch-1.raku | 2 +-
 challenge-046/markus-holzer/raku/ch-2.raku | 4 ++--
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/challenge-046/markus-holzer/raku/ch-1.raku b/challenge-046/markus-holzer/raku/ch-1.raku
index 5c5c38ae18..7199005c6e 100644
--- a/challenge-046/markus-holzer/raku/ch-1.raku
+++ b/challenge-046/markus-holzer/raku/ch-1.raku
@@ -12,7 +12,7 @@ say decrypt( $message );
 
 sub decrypt( $encrypted )
 {
-    join '', roundrobin( 
+    join '', zip( 
         $encrypted.lines.map({ .split(/ \s /) }) 
     ).map({ 
         .Bag.first({ .value > 1 }).key 
diff --git a/challenge-046/markus-holzer/raku/ch-2.raku b/challenge-046/markus-holzer/raku/ch-2.raku
index 247eb96c6a..1fac6c7585 100644
--- a/challenge-046/markus-holzer/raku/ch-2.raku
+++ b/challenge-046/markus-holzer/raku/ch-2.raku
@@ -4,8 +4,8 @@ say "Open rooms: \n", (1..^500).grep({
 
 sub is-open( $i )
 {
-    my $is-open = !($i %% 2);
-    $is-open = !$is-open if $i %% $_ for 3 .. 500;
+    my $is-open = True;
+    $is-open = !$is-open if $i %% $_ for 2 .. 500;
     $is-open;
 }
 
-- 
cgit