diff options
author | Peter von Kaehne <refdoc@gmx.net> | 2015-12-25 00:43:22 +0000 |
---|---|---|
committer | Peter von Kaehne <refdoc@gmx.net> | 2015-12-25 00:43:22 +0000 |
commit | 13d9e40b1c1240e1196e7b44977d7ae13a30c8e1 (patch) | |
tree | 015c2b81bc15265e633ef1916d4c1882e7336656 /modules | |
parent | b65ed23c2dd5798c0088205d29dd2bbb3a6dfa5a (diff) | |
download | sword-tools-13d9e40b1c1240e1196e7b44977d7ae13a30c8e1.tar.gz |
input utf8 correction
git-svn-id: https://www.crosswire.org/svn/sword-tools/trunk@504 07627401-56e2-0310-80f4-f8cd0041bdcd
Diffstat (limited to 'modules')
-rwxr-xr-x | modules/conf/confmaker.pl | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/modules/conf/confmaker.pl b/modules/conf/confmaker.pl index 6367ec5..1bb14d5 100755 --- a/modules/conf/confmaker.pl +++ b/modules/conf/confmaker.pl @@ -65,14 +65,15 @@ $nextarg = 1; if (@ARGV[$nextarg] eq "-o") { $outputFileName = "@ARGV[$nextarg+1]"; $nextarg += 2; - open (OUTF, , ">:utf8", "$outputFileName") or die "Could not open file $outputFileName for writing."; + open (OUTF, ">:utf8", "$outputFileName") or die "Could not open file $outputFileName for writing."; select(OUTF) } if (@ARGV[$nextarg] eq "-i") { $inputFileName = "@ARGV[$nextarg+1]"; $nextarg += 2; - @inputFile=`cat $inputFileName`; + open INF, "<:utf8","$inputFileName" ; + @inputfile = <INF>; } if (@ARGV[$nextarg] eq "-m") { |