Extra argument for setting encoding.

[gedcom-parse.git] / t / src / test_writegom

diff --git a/t/src/test_writegom b/t/src/test_writegom
index 24ec246a1845670d3f785efb6745ba979d39df79..89f297061848f206dcf8b05f9310aea14fb34120 100755 (executable)
--- a/t/src/test_writegom
+++ b/t/src/test_writegom
@@ -17,9 +17,24 @@ gedcom_out=1
 terminator=$1
 encoding=$2
 unicode_details=$3
+infile=$4
 options="$options -t $terminator -e $encoding"
 
-if [ "$encoding" == "UNICODE" ]
+if [ "$infile" ]
+then
+  if [ -z "$srcdir" ]
+  then
+    testfile=$infile
+  else
+    case $file in
+      ./*) testfile=$infile ;;
+      *)   testfile=$srcdir/input/$infile ;;
+    esac
+  fi
+  options="$options -i $testfile"
+fi
+
+if [ "$encoding" = "UNICODE" ]
 then
   options="$options -u $unicode_details"
 fi