diff options
| author | phikoehn <pkoehn@inf.ed.ac.uk> | 2013-01-14 23:25:43 +0400 |
|---|---|---|
| committer | phikoehn <pkoehn@inf.ed.ac.uk> | 2013-01-14 23:25:43 +0400 |
| commit | a7f7379fa4e9aca50a1261a624ba7c9db0a556e6 (patch) | |
| tree | a2f6b936468d48699cf0b5a6771eed3ba1203d6a /scripts/recaser | |
| parent | d5cf38cab2c64a7bb756e2a40b5a768e3a687249 (diff) | |
fixed bug in detruecaser / interaction with esacping
Diffstat (limited to 'scripts/recaser')
| -rwxr-xr-x | scripts/recaser/detruecase.perl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/scripts/recaser/detruecase.perl b/scripts/recaser/detruecase.perl index 4a1b3beae..49c89c299 100755 --- a/scripts/recaser/detruecase.perl +++ b/scripts/recaser/detruecase.perl @@ -13,7 +13,7 @@ die("detruecase.perl < in > out") 'in=s' => \$INFILE); my %SENTENCE_END = ("."=>1,":"=>1,"?"=>1,"!"=>1); -my %DELAYED_SENTENCE_START = ("("=>1,"["=>1,"\""=>1,"'"=>1); +my %DELAYED_SENTENCE_START = ("("=>1,"["=>1,"\""=>1,"'"=>1,"""=>1,"'"=>1,"["=>1,"]"=>1); # lowercase even in headline my %ALWAYS_LOWER; |