Perform explicit exit-nonzero if the embedded Perl script fails.

* tests/misc/pwd-long: Add canonical '(exit $fail); exit $fail'.

Signed-off-by: Jim Meyering <meyering@redhat.com>

diff --git a/tests/misc/pwd-long b/tests/misc/pwd-long
index d931d34..37b552c 100755 (executable)
--- a/tests/misc/pwd-long
+++ b/tests/misc/pwd-long
@@ -1,4 +1,5 @@
 #!/bin/sh
+# -*- perl -*-
 # Ensure that pwd works even when run from a very deep directory.
 
 # Copyright (C) 2006-2008 Free Software Foundation, Inc.
@@ -112,3 +113,7 @@ if ($expected ne $actual)
     exit 1;
   }
 EOF
+
+fail=$?
+
+(exit $fail); exit $fail