(invalid-j): New partial test for the above fix.

diff --git a/tests/join/Test.pm b/tests/join/Test.pm
index 6f0d3b7581d79dbeb9ec9167a46edc7b75c97dec..e666a751035794279f8f87ed40bf0ce7f899d4c7 100644 (file)
--- a/tests/join/Test.pm
+++ b/tests/join/Test.pm
@@ -117,6 +117,9 @@ my @tv = (
  [t_subst "a:1\nb:1\n", t_subst "a:2:\nb:2:\n"],
  t_subst "a:1:2:\nb:1:2:\n", 0],
 
+# FIXME: change this to ensure the diagnostic makes sense
+['invalid-j', '-j x', {}, "", 1],
+
 );