Rename harness2subunit.pl -> tap2subunit to be consistent with the

subunit tools.

1 files changed, 0 insertions, 36 deletions

diff --git a/lib/subunit/harness2subunit.pl b/lib/subunit/harness2subunit.pl
deleted file mode 100755
index 45f515540b..0000000000
--- a/lib/subunit/harness2subunit.pl
+++ /dev/null
@@ -1,36 +0,0 @@
-#!/usr/bin/perl
-# Simple script that converts Perl test harness output to 
-# Subunit
-# Copyright (C) 2008 Jelmer Vernooij <jelmer@samba.org>
-# Published under the GNU GPL, v3 or later
-
-my $firstline = 1;
-my $error = 0;
-while(<STDIN>) {
-	if ($firstline) {
-		$firstline = 0;
-		next;
-	}
-	if (/^not ok (\d+) - (.*)$/) {
-		print "test: $2\n";
-		print "failure: $2\n";
-		$error = 1;
-	} elsif (/^ok (\d+) - (.*)$/) {
-		print "test: $2\n";
-		print "success: $2\n";
-	} elsif (/^ok (\d+)$/) {
-		print "test: $1\n";
-		print "success: $1\n";
-	} elsif (/^ok (\d+) # skip (.*)$/) {
-		print "test: $1\n";
-		print "skip: $1 [\n$2\n]\n";
-	} elsif (/^not ok (\d+)$/) {
-		print "test: $1\n";
-		print "failure: $1\n";
-		$error = 1;
-	} else {
-		print;
-	}
-}
-exit $error;
-