summaryrefslogtreecommitdiffstats
path: root/remove-binary-diff.pl
diff options
context:
space:
mode:
Diffstat (limited to 'remove-binary-diff.pl')
-rwxr-xr-xremove-binary-diff.pl34
1 files changed, 0 insertions, 34 deletions
diff --git a/remove-binary-diff.pl b/remove-binary-diff.pl
deleted file mode 100755
index 9048490ca..000000000
--- a/remove-binary-diff.pl
+++ /dev/null
@@ -1,34 +0,0 @@
-#!/usr/bin/perl -w
-# A script to remove those terrible binary diffs from the patches which
-# screw up everything and rain on my parade.
-
-use strict;
-
-my @args=@ARGV;
-my @current_patch;
-my $is_binary = 0;
-my $cnt = 0;
-
-while(my $row = <>) {
- # diff marks the start of a new file to check
- if ($row =~ /^diff --git.*?(\S+)$/) {
- if (!$is_binary) {
- foreach my $line (@current_patch) {
- print $line;
- }
- }
- $is_binary = 0;
- @current_patch = ();
- } elsif ($row =~ /Binary files (.)* differ$/) {
- $is_binary = 1;
- } elsif ($row =~ /GIT binary patch/) {
- $is_binary = 1;
- }
- push (@current_patch, $row);
-}
-
-if (!$is_binary) {
- foreach my $line (@current_patch) {
- print $line;
- }
-}