.

diff --git a/tests/join/build-script b/tests/join/build-script
index f31a27112a2001dcefa74daa436923ef2e88241d..c55cf3449de4dcb9e71dd9eeea4eb58c007f2ba0 100755 (executable)
--- a/tests/join/build-script
+++ b/tests/join/build-script
@@ -1,4 +1,4 @@
-#!/p/bin/perl5.000 -w
+#!/usr/bin/perl -w
 
 $join = 'join';
 $join = '/usr/bin/join';

diff --git a/tests/join/test.data.pl b/tests/join/test.data.pl
index ed1abd7844c9474199ff3310131fdd29144eeba4..77fe0785877eadc14fb2fec0c8a59a0c1bb49993 100755 (executable)
--- a/tests/join/test.data.pl
+++ b/tests/join/test.data.pl
@@ -47,3 +47,6 @@
 
 ('8a', '-a1 -e . -o 0,1.2',  "a\nb\nc\nd G\n", "a x y\nb\nc\ne\n", "a .\nb .\nc .\nd G\n", 0);
 ('8b', '-a1 -a2 -e . -o 0,1.2',  "a\nb\nc\nd G\n", "a x y\nb\nc\ne\n", "a .\nb .\nc .\nd G\ne .\n", 0);
+
+# From David Dyck
+('9a', '',  " a 1\n b 2\n", " a Y\n b Z\n", "a 1 Y\nb 2 Z\n", 0);