From ded46c159bd3d814db3fda22eb0fc8c46a23320e Mon Sep 17 00:00:00 2001 From: Jim Meyering Date: Wed, 26 Aug 1998 15:17:59 +0000 Subject: [PATCH] . --- tests/ls-2/Test.pm | 31 ------------------------------- 1 file changed, 31 deletions(-) delete mode 100644 tests/ls-2/Test.pm diff --git a/tests/ls-2/Test.pm b/tests/ls-2/Test.pm deleted file mode 100644 index d98f55875f..0000000000 --- a/tests/ls-2/Test.pm +++ /dev/null @@ -1,31 +0,0 @@ -# -*-perl-*- -package Test; -require 5.002; -use strict; - -# Always copy filename arguments from $srcdir to current directory -# before running ls on them. Otherwise, we'd have to factor out -# differences in $srcdir from the expected output. -$Test::copy_fileargs_default = 1; - -sub test_vector -{ - my @tv = - ( - # test-name options input expected-output expected-return-code - # - ['q-', '', {"q\a" => 'contents'}, "q\a\n", 0], - ['q-N', '-N', {"q\a" => ''}, "q\a\n", 0], - ['q-q', '-q', {"q\a" => ''}, "q?\n", 0], - ['q-Q', '-Q', {"q\a" => ''}, "\"q\\a\"\n", 0], - ['q-qs-lit', '--quoting=literal', {"q\a" => ''}, "q\a\n", 0], - ['q-qs-sh', '--quoting=shell', {"q\a" => ''}, "q\a\n", 0], - ['q-qs-sh-a', '--quoting=shell-always', {"q\a" => ''}, "'q\a'\n", 0], - ['q-qs-c', '--quoting=c', {"q\a" => ''}, "\"q\\a\"\n", 0], - ['q-qs-esc', '--quoting=escape', {"q\a" => ''}, "q\\a\n", 0], - ); - - return @tv; -} - -1; -- 2.47.3