From a1ee4822771957e34d6990e35c272c8da183027d Mon Sep 17 00:00:00 2001
From: Andinus <andinus@nand.sh>
Date: Sat, 11 Sep 2021 18:47:44 +0530
Subject: Raku: Complete Phone Number & RNA Transcription

---
 raku/phone-number/Phone.rakumod | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'raku/phone-number/Phone.rakumod')

diff --git a/raku/phone-number/Phone.rakumod b/raku/phone-number/Phone.rakumod
index 66a9e24..0761246 100644
--- a/raku/phone-number/Phone.rakumod
+++ b/raku/phone-number/Phone.rakumod
@@ -18,7 +18,7 @@ sub clean-number(Str $number --> Str) is export {
     # <punct> matches "(";
     die @errors[4] if $number.contains: /<[!:]>/;
 
-    my Int @num = $number.comb.grep(/\d/)>>.Int;
+    my Int @num = $number.comb(/\d/)>>.Int;
     given @num {
         when .elems == 11 {
             die @errors[0] if .[0] !== 1;
-- 
cgit 1.4.1-2-gfad0