diff options
-rwxr-xr-x | tests/mk-script | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/mk-script b/tests/mk-script index a004bb1cb..aef808a1c 100755 --- a/tests/mk-script +++ b/tests/mk-script @@ -15,7 +15,7 @@ use POSIX qw (assert); BEGIN { push @INC, '.' if '.' ne '.'; } use Test; -my $srcdir = '.'; +my $srcdir = shift; sub validate { @@ -170,7 +170,7 @@ sub wrap { $| = 1; - die "Usage: $0: program-name\n" if @ARGV != 1; + die "Usage: $0: srcdir program-name\n" if @ARGV != 1; my $xx = $ARGV[0]; |