diff options
author | Chris Little <chrislit@crosswire.org> | 2012-01-19 04:16:38 +0000 |
---|---|---|
committer | Chris Little <chrislit@crosswire.org> | 2012-01-19 04:16:38 +0000 |
commit | 6f5af54a493f245462283abfa12b202ed717f535 (patch) | |
tree | 3980cf4e655b9363509f9008268ab8e76ba82152 | |
parent | 7c01059823faa55a66ba69f79ec6cb7227733be9 (diff) | |
download | sword-tools-6f5af54a493f245462283abfa12b202ed717f535.tar.gz |
removed processing of mid-word apostrophes; the (previous) fix didn't actually do anything but waste a few cycles (This line was originally for processing SFM, not USFM, in which apostrophes where expected to be transformed into pretty apostrophes in the course of typesetting.)
git-svn-id: https://www.crosswire.org/svn/sword-tools/trunk@347 07627401-56e2-0310-80f4-f8cd0041bdcd
-rw-r--r-- | modules/perlconverters/usfm2osis.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/modules/perlconverters/usfm2osis.pl b/modules/perlconverters/usfm2osis.pl index c21189d..41e02b3 100644 --- a/modules/perlconverters/usfm2osis.pl +++ b/modules/perlconverters/usfm2osis.pl @@ -225,7 +225,7 @@ foreach $file (@files) { $line =~ s/</\$/g; $line =~ s/>/\%/g; - $line =~ s/(\w)\'(\w)/"$1" . chr(0x0027) . "$2"/eg; + # $line =~ s/(\w)\'(\w)/"$1" . chr(0x2019) . "$2"/eg; $line =~ s/\\fr 1\/2 \\fr\*/chr(0xBD)/eg; @filedata[$i] = $line; |