[sword-svn] r507 - trunk/modules/conf

refdoc at crosswire.org refdoc at crosswire.org
Fri Dec 25 23:40:51 MST 2015


Author: refdoc
Date: 2015-12-25 23:40:51 -0700 (Fri, 25 Dec 2015)
New Revision: 507

Modified:
   trunk/modules/conf/confmaker.pl
Log:
corrections


Modified: trunk/modules/conf/confmaker.pl
===================================================================
--- trunk/modules/conf/confmaker.pl	2015-12-25 00:54:38 UTC (rev 506)
+++ trunk/modules/conf/confmaker.pl	2015-12-26 06:40:51 UTC (rev 507)
@@ -65,15 +65,15 @@
 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,, ">", "$outputFileName") or die "Could not open file $outputFileName for writing.";
        select(OUTF)
        }
 
 if (@ARGV[$nextarg] eq "-i") {
        $inputFileName = "@ARGV[$nextarg+1]";
        $nextarg += 2;
-       open (INF,, "<:utf8","$inputFileName") or die "Could not open inputfile $inputFileName for reading ; 
-       @inputfile = <INF>;
+       open (INF,, "<","$inputFileName") or die "Could not open inputfile $inputFileName for reading" ; 
+       @inputFile = <INF>;
        }
 
 if (@ARGV[$nextarg] eq "-m") {




More information about the sword-cvs mailing list