From e3ad4ebb7065b755ab3e424cd207a58dc7cb23a7 Mon Sep 17 00:00:00 2001 From: Mark <53903062+andemark@users.noreply.github.com> Date: Mon, 18 Dec 2023 10:22:41 +0000 Subject: Challenge 248 Solutions (Raku) --- challenge-248/mark-anderson/raku/ch-1.raku | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/challenge-248/mark-anderson/raku/ch-1.raku b/challenge-248/mark-anderson/raku/ch-1.raku index 9f9cfc21e3..9d664435ed 100644 --- a/challenge-248/mark-anderson/raku/ch-1.raku +++ b/challenge-248/mark-anderson/raku/ch-1.raku @@ -24,13 +24,13 @@ sub shortest-distance($str, $char) my $middle = gather for @a -> $a, $b { take 0 xx $a.chars; - take distance($b) + take distances($b) } flat ($head, $middle, $tail)>>.List } -sub distance($s) +sub distances($s) { return Empty unless $s; my $mid = ($s.chars / 2).ceiling; -- cgit