diff options
| author | Chris Little <chrislit@crosswire.org> | 2009-12-19 23:41:06 +0000 |
|---|---|---|
| committer | Chris Little <chrislit@crosswire.org> | 2009-12-19 23:41:06 +0000 |
| commit | a062147266fd64c4205cb9f10b4da1188b5ed109 (patch) | |
| tree | 19a2903e7312e4536c908cc23aba9f0280eeacf4 /modules/perlconverters | |
| parent | de609c381cfe743caf418fffbc0bc0fb63664d2b (diff) | |
| download | sword-tools-a062147266fd64c4205cb9f10b4da1188b5ed109.tar.gz | |
made type argument case insensitive
git-svn-id: https://www.crosswire.org/svn/sword-tools/trunk@257 07627401-56e2-0310-80f4-f8cd0041bdcd
Diffstat (limited to 'modules/perlconverters')
| -rw-r--r-- | modules/perlconverters/usfm2osis.pl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/modules/perlconverters/usfm2osis.pl b/modules/perlconverters/usfm2osis.pl index f298936..7bb7e70 100644 --- a/modules/perlconverters/usfm2osis.pl +++ b/modules/perlconverters/usfm2osis.pl @@ -87,7 +87,6 @@ $usfmVersion = "2.2"; # The USFM reference document can be found at http://www.u $divOpen=false; - # Generates a list of available encodings. use Encode; @encodingList = Encode->encodings(":all"); @@ -132,11 +131,13 @@ else { if (@ARGV[$nextarg] eq "-t") { $moduleType = "@ARGV[$nextarg+1]"; + $moduleType = lc($moduleType); $nextarg += 2; } else { $moduleType = "bible"; } + $encFound = 0; foreach $enc (@encodingList) { if ($enc eq $inputEncoding) { |