diff --git a/lib/modules/testsuite.in b/lib/modules/testsuite.in
index 8936d752caa64c2016f27653fe5a93c513c5e689..836278cd456ed957ffffdc984c366262b8fb1efd 100644
--- a/lib/modules/testsuite.in
+++ b/lib/modules/testsuite.in
@@ -1,4 +1,4 @@
-dnl $Id: testsuite.in,v 1.6 2002/11/15 21:09:12 grubba Exp $
+dnl $Id: testsuite.in,v 1.7 2002/11/15 22:03:06 grubba Exp $
 
 dnl - Array
 
@@ -364,15 +364,15 @@ test_do( putenv("POSIX_ME_HARDER", "1"); )
 test_eval_error( Getop.get_args(({ "x", "a", "-b" }), -1, 1) )
 test_equal( Getopt.get_args(({ "x", "a", "-b" }), 1, 1), ({ "x", "a", "-b" }))
 test_equal( Getopt.get_args(({ "x", 0, "-b" }), 1, 1), ({ "x", "-b" }))
-test_eval_error( opt( ({"x","a","-b"}), ({"y",Getopy.HAS_ARG,"-b"}), -1 ))
+test_eval_error( opt( ({"x","a","-b"}), ({"y",Getopt.HAS_ARG,"-b"}), -1, 1 ))
 test_any_equal([[
   array x = ({ "x", "a", "-b" });
-  opt(x, ({ "y", Getopt.HAS_ARG, "-b" }) );
+  opt(x, ({ "y", Getopt.HAS_ARG, "-b" }), 1, 1 );
   return x;
 ]],[[ ({ "x", "a", "-b" }) ]])
 test_any_equal([[
   array x = ({ "x", "a", "-b" });
-  opt(x, ({ "y", Getopt.HAS_ARG, "-b" }), 1);
+  opt(x, ({ "y", Getopt.HAS_ARG, "-b" }), 1, 1);
   return x;
 ]],[[ ({ "x", "a", "-b" }) ]])