]> git.ipfire.org Git - thirdparty/coreutils.git/commitdiff
.
authorJim Meyering <jim@meyering.net>
Sun, 6 Dec 1998 23:09:14 +0000 (23:09 +0000)
committerJim Meyering <jim@meyering.net>
Sun, 6 Dec 1998 23:09:14 +0000 (23:09 +0000)
tests/ls-2/Makefile.in
tests/ls-2/quoting [deleted file]

index 5ef53cb7e50fbbb12d4155a56f6491e4a78175c4..d562380bc6fcfddda2994987a9f93b0f26cb5bd5 100644 (file)
@@ -99,7 +99,7 @@ TESTS_ENVIRONMENT = \
   PATH=../../src:$$PATH \
   PROG=ls
 
-TESTS = quoting
+TESTS = tests
 mkinstalldirs = $(SHELL) $(top_srcdir)/mkinstalldirs
 CONFIG_HEADER = ../../config.h
 CONFIG_CLEAN_FILES = 
diff --git a/tests/ls-2/quoting b/tests/ls-2/quoting
deleted file mode 100755 (executable)
index 6a3e381..0000000
+++ /dev/null
@@ -1,53 +0,0 @@
-#!/bin/sh
-
-: ${PERL=perl}
-: ${srcdir=.}
-
-case "$PERL" in
-  *'missing perl')
-  echo 1>&2 "$0: configure didn't find a usable version of Perl, so can't run this test"
-  exit 77
-  ;;
-esac
-
-exec $PERL -w -I$srcdir/.. -MFetish -- - << \EOF
-require 5.003;
-use strict;
-
-(my $program_name = $0) =~ s|.*/||;
-
-# Turn off localisation of executable's ouput.
-@ENV{qw(LANGUAGE LANG LC_ALL)} = ('C') x 3;
-
-my $mkdir = {PRE => sub {mkdir 'd',0755 or die "d: $!\n"}};
-my $rmdir = {POST => sub {rmdir 'd' or die "d: $!\n"}};
-
-my $q_bell = {IN => {"q\a" => ''}};
-my @Tests =
-    (
-     # test-name options input expected-output
-     #
-     ['q-',        $q_bell, {OUT => "q\a\n"}, {EXIT => 0}],
-     ['q-N', '-N', $q_bell, {OUT => "q\a\n"}, {ERR => ''}],
-     ['q-q', '-q', $q_bell, {OUT => "q?\n"}],
-     ['q-Q', '-Q', $q_bell, {OUT => "\"q\\a\"\n"}],
-
-     ['q-lit-q', '--quoting=literal -q',     $q_bell, {OUT => "q?\n"}],
-     ['q-qs-lit', '--quoting=literal',       $q_bell, {OUT => "q\a\n"}],
-     ['q-qs-sh', '--quoting=shell',          $q_bell, {OUT => "q\a\n"}],
-     ['q-qs-sh-a', '--quoting=shell-always', $q_bell, {OUT => "'q\a'\n"}],
-     ['q-qs-c', '--quoting=c',               $q_bell, {OUT => "\"q\\a\"\n"}],
-     ['q-qs-esc', '--quoting=escape',        $q_bell, {OUT => "q\\a\n"}],
-
-     ['emptydir', 'd',  {OUT => ''}, $mkdir, $rmdir],
-     ['emptydir-x2', 'd d',  {OUT => "d:\n\nd:\n"}, $mkdir, $rmdir],
-     ['emptydir-R', '-R d',  {OUT => "d:\n"}, $mkdir, $rmdir],
-    );
-
-my $save_temps = $ENV{SAVE_TEMPS};
-my $verbose = $ENV{VERBOSE};
-
-my $prog = $ENV{PROG} || die "$0: \$PROG not specified in environment\n";
-my $fail = run_tests ($program_name, $prog, \@Tests, $save_temps, $verbose);
-exit $fail;
-EOF