moses-smt/mosesdecoder
1
1
Fork 0
mirror of https://github.com/moses-smt/mosesdecoder.git synced 2024-09-11 11:25:40 +03:00
Code Issues Packages Projects Releases Wiki Activity

reference-from-sgm.perl: fix Perl error

Browse Source
This commit is contained in:
Phil Williams 2017-03-07 15:54:08 +00:00
parent e983e33180
commit a5c99ca660
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
scripts/ems/support/reference-from-sgm.perl
View File

@ -60,7 +60,7 @@ foreach my $system (keys %DOC) {
}
open(TXT,">$outfile") || die($outfile);
foreach my $doc (@ORDER) {
die("can't find '$doc' for ref '$system'") unless defined @{$DOC{$system}{$doc}};
die("can't find '$doc' for ref '$system'") unless defined $DOC{$system}{$doc};
foreach my $line (@{$DOC{$system}{$doc}}) {
print TXT $line."\n";
}