From 934afac99c244c34bae234c284628a2ed02ff308 Mon Sep 17 00:00:00 2001
From: hjp <hjp>
Date: Tue, 8 Feb 2000 17:09:41 +0000
Subject: [PATCH] Removed cvsdiffmin (automatically generated from
 cvsdiffmin.pl)

---
 cvsdiffmin/cvsdiffmin | 69 -------------------------------------------
 1 file changed, 69 deletions(-)
 delete mode 100755 cvsdiffmin/cvsdiffmin

diff --git a/cvsdiffmin/cvsdiffmin b/cvsdiffmin/cvsdiffmin
deleted file mode 100755
index 5569528..0000000
--- a/cvsdiffmin/cvsdiffmin
+++ /dev/null
@@ -1,69 +0,0 @@
-#!/usr/local/bin/perl -w
-#
-# $Id: cvsdiffmin,v 1.2 2000-02-08 16:58:28 hjp Exp $
-#
-# cvsdiffmin - minimize output of cvs diff
-#
-
-use strict;
-
-use File::Slurp;
-
-my $diff = "/usr/local/bin/diff";
-
-my $state = 'EQ';
-my %text = ();
-my %cap = ();
-my $count = 0;
-
-local $| = 1;
-
-while (<>) {
-
-    if ($state eq 'EQ' && /^\<{7} /) {
-	$state = 'V1';
-	$text{$state} = "";
-	s/'/_/g;
-	$cap{$state} = $_;
-	next;
-    }
-    if ($state eq 'V1' && /^\={7}$/) {
-	$state = 'V2';
-	$text{$state} = "";
-	next;
-    }
-    if ($state eq 'V2' && /^\>{7} /) {
-	s/'/_/g;
-	$cap{$state} = $_;
-	write_file("cvsdiffmin.$$.$count.1", $text{V1});
-	write_file("cvsdiffmin.$$.$count.2", $text{V2});
-	open (DIFF,
-	    "$diff " .
-	        " --unchanged-group-format='\%='" .
-	        " --changed-group-format='${cap{V1}}\%<=======\n\%>${cap{V2}}'" .
-	        " --old-group-format='${cap{V1}}\%<=======\n\%>${cap{V2}}'" .
-	        " --new-group-format='${cap{V1}}\%<=======\n\%>${cap{V2}}'" .
-		" cvsdiffmin.$$.$count.1" .
-		" cvsdiffmin.$$.$count.2" .
-		"|") or die "cannot invoke diff: $!";
-	while (<DIFF>) {
-	    print;
-	}
-	close(DIFF);
-
-	
-	$state = 'EQ';
-	$count++;
-	next;
-    }
-    if ($state eq 'EQ') {
-	print;
-    } else {
-	$text{$state} .= $_;
-    }
-    
-}
-
-print "$state\n";
-
-# vim:sw=4