Option to print current setting.

diff --git a/t/set_testenv b/t/set_testenv
index a36af0b0897a90131292ae5c39c776d31fc1a506..adb75d4844b8a5b2033549c3199b596c75288cab 100755 (executable)
--- a/t/set_testenv
+++ b/t/set_testenv
@@ -3,6 +3,8 @@
 #  . set_testenv ddd
 # To clear the test environment:
 #  . set_testenv
+# To show the test environment:
+#  . set_testenv print
 
 testenv=$1
 
@@ -17,6 +19,10 @@ case "$testenv" in
     export GEDCOM_TESTENV='ddd'
     export GEDCOM_NOOPTS=1 ;;
 
+  print)
+    echo "GEDCOM_TESTENV=$GEDCOM_TESTENV"
+    echo "GEDCOM_NOOPTS=$GEDCOM_NOOPTS" ;;
+
   "")
     echo "Clearing test environment"
     unset GEDCOM_TESTENV