From 6fe6b26d3e03f849c61d1425968b68d2e0ab4d31 Mon Sep 17 00:00:00 2001
From: Mark <53903062+andemark@users.noreply.github.com>
Date: Mon, 25 Dec 2023 12:25:40 +0000
Subject: Challenge 249 Solutions (Raku)

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

diff --git a/challenge-249/mark-anderson/raku/ch-1.raku b/challenge-249/mark-anderson/raku/ch-1.raku
index d3b772effb..8b84602374 100644
--- a/challenge-249/mark-anderson/raku/ch-1.raku
+++ b/challenge-249/mark-anderson/raku/ch-1.raku
@@ -2,11 +2,11 @@
 use Test;
 
 is-deeply equal-pairs(3,2,3,2,2,2), ((2,2),(2,2),(3,3));
-nok       equal-pairs(1,2,3,4);
+is-deeply equal-pairs(1,2,3,4),     ();
 
 sub equal-pairs(+@a where * %% 2)
 {
     my $b = @a.Bag;
-    return False unless all($b.values) %% 2;
+    return () unless all($b.values) %% 2;
     $b.kxxv.sort.rotor(2) 
 }
-- 
cgit