diff options
author | Kenneth Heafield <kenlm@kheafield.com> | 2012-02-10 14:13:44 -0500 |
---|---|---|
committer | Kenneth Heafield <kenlm@kheafield.com> | 2012-02-10 14:13:44 -0500 |
commit | 51ddc7d2f2086908ea8a194a68225e0289f930d5 (patch) | |
tree | 5f2aebeedb63f9e860da449cde2f63ad5cc0c819 /gi/pf/guess-translits.pl | |
parent | a97f481dda269c1474722ce7dc987fb5868951b6 (diff) | |
parent | f15bbfbf105ff873e89a8bdf55e845f3ac7b030e (diff) |
Merge branch 'master' of github.com:redpony/cdec
Diffstat (limited to 'gi/pf/guess-translits.pl')
-rwxr-xr-x | gi/pf/guess-translits.pl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gi/pf/guess-translits.pl b/gi/pf/guess-translits.pl index ab737121..aafec13a 100755 --- a/gi/pf/guess-translits.pl +++ b/gi/pf/guess-translits.pl @@ -28,6 +28,7 @@ while(<STDIN>) { my %b2a; for my $ap (@as) { my ($a,$b) = split /-/, $ap; + die "BAD INPUT: $_\n" unless defined $a && defined $b; $a2b{$a}->{$b} = 1; $b2a{$b}->{$a} = 1; } |