diff options
| author | Jim Meyering <jim@meyering.net> | 1996-12-16 00:40:55 +0000 |
|---|---|---|
| committer | Jim Meyering <jim@meyering.net> | 1996-12-16 00:40:55 +0000 |
| commit | 17a2ec94a8c0e7704ac5de48eb7b7ab5ccfa4886 (patch) | |
| tree | 3f90e27cab74b5964260e1210bd3a94c8d7d5bca /tests/join/mk-script.pl | |
| parent | e7f85031381e892fc98d6ce804591a4aecb07a04 (diff) | |
| download | coreutils-17a2ec94a8c0e7704ac5de48eb7b7ab5ccfa4886.tar.xz | |
.
Diffstat (limited to 'tests/join/mk-script.pl')
| -rw-r--r-- | tests/join/mk-script.pl | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/tests/join/mk-script.pl b/tests/join/mk-script.pl index 0a8778512..ab2c6f112 100644 --- a/tests/join/mk-script.pl +++ b/tests/join/mk-script.pl @@ -71,11 +71,13 @@ sub spec_to_list ($$$) return \%h; } -$| = 1; +# ~~~~~~~ main ~~~~~~~~ +{ + $| = 1; -my $xx = $ARGV[0]; + my $xx = $ARGV[0]; -print <<EOF; + print <<EOF; #! /bin/sh # This script was generated automatically by build-script. case \$# in @@ -89,7 +91,6 @@ test "\$srcdir" || srcdir=. test "\$VERBOSE" && \$xx --version 2> /dev/null EOF -{ my %seen; my $test_vector; |