fix issue #52 test; rinutils subdir

diff --git a/fortune-mod/tests/t/check-rinutils.t b/fortune-mod/tests/t/check-rinutils.t
index c5605ef07661ce62b000e18cda745fcd38733152..0e6c355a294415f994e94c39dfb6082745f1b58b 100644 (file)
--- a/fortune-mod/tests/t/check-rinutils.t
+++ b/fortune-mod/tests/t/check-rinutils.t
@@ -20,13 +20,18 @@ sub check_file
 
 sub mytest
 {
-    foreach my $fn ("rinutils/rinutils/include/rinutils/portable_time.h")
+    my $dir = "$ENV{SRC_DIR}/rinutils";
+    if ( -e $dir )
     {
-        my $err = check_file("$ENV{SRC_DIR}/${fn}");
-        if ( $err ne '' )
+        # body...
+        foreach my $fn ("rinutils/include/rinutils/portable_time.h")
         {
-            fail("$fn failed - $err.");
-            return;
+            my $err = check_file("${dir}/${fn}");
+            if ( $err ne '' )
+            {
+                fail("$fn failed - $err.");
+                return;
+            }
         }
     }
     pass("All are ok.");