Hiragana: fixing test for erors

master
Rob Emery 2014-10-12 22:23:06 +01:00
parent 1639d54f31
commit 887bc7a6bf
2 changed files with 2 additions and 0 deletions

View File

@ -51,6 +51,7 @@ my %hiragana = (
handle remainder => sub { handle remainder => sub {
return $hiragana{lc $_} if defined $hiragana{lc $_}; return $hiragana{lc $_} if defined $hiragana{lc $_};
return;
}; };
1; 1;

View File

@ -14,6 +14,7 @@ ddg_goodie_test(
)], )],
"hiragana a" => test_zci('あ'), "hiragana a" => test_zci('あ'),
"what is hiragana?" => undef,
); );
done_testing(); done_testing();