Add symlink test cases, remove obsolete test infrastructure.

[matthijs/upstream/blosxom.git] / t / Setup

diff --git a/t/Setup b/t/Setup
deleted file mode 100755 (executable)
index 93f0733..0000000
--- a/t/Setup
+++ /dev/null
@@ -1,27 +0,0 @@
-#!/usr/bin/env perl
-#
-# Script to setup test script symlinks, since CVS can't store them
-#
-
-use strict;
-use IO::File;
-
-my $DRIVER = 'driver';
-my $TESTS = 'Tests';
-die "cannot find driver file '$DRIVER'" unless -f $DRIVER;
-die "cannot find tests file '$TESTS'" unless -f $TESTS;
-
-my @tests = ();
-
-my $th = IO::File->new($TESTS, 'r') 
-  or die "cannot open tests file '$TESTS': $!";
-@tests = <$th>;
-close $th;
-
-for my $t (@tests) {
-  chomp $t;
-  unlink $t if -l $t;
-  print "symlink $DRIVER $t\n"; 
-  eval { symlink $DRIVER, $t } or die "symlink $DRIVER, $t failed: $!";
-} 
-