From 79483625f801e67e2a932b8e58944f855fbadb50 Mon Sep 17 00:00:00 2001 From: Jonathan Stowe Date: Wed, 8 Mar 2017 20:54:54 +0000 Subject: [PATCH] Fix for non-flattening --- t/020-words.t | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/t/020-words.t b/t/020-words.t index d8af87c..58804be 100644 --- a/t/020-words.t +++ b/t/020-words.t @@ -14,7 +14,7 @@ for $*PROGRAM.parent.child("words.txt").lines -> $line { plan @lines.elems; -for @lines -> ($in, $one, $two? ) { +for @lines -> [$in, $one, $two? ] { my ( $out-one, $out-two ) = double-metaphone($in); is $out-one, $one, "$in is rendered to $one"; }