Fix the coercion syntax

tadzik · May 12, 2017 · 1f5bd31 · 1f5bd31
1 parent 7b7d7af
commit 1f5bd31
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/Text/T9.pm b/lib/Text/T9.pm
@@ -24,7 +24,7 @@ my %default-keys;
 %default-keys{$_} = 9 for <w x y z>;
 
 #= get a list of words from @words matching $input
-sub t9_find_words(Int $input as Str, @words, %optkeys?) is export {
+sub t9_find_words(Str(Int) $input, @words, %optkeys?) is export {
     my %keys = %default-keys, %optkeys;
     gather for @words -> $candidate {
         next unless $input.chars == $candidate.chars;