X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=InstallShield%2Fdecyg.pl;fp=InstallShield%2Fdecyg.pl;h=0000000000000000000000000000000000000000;hp=7bcfd7e2850f364d1f78dd58e4e9ccbcfbc50826;hb=b4e88b1999b29c14668df90564fc0d3c89d94120;hpb=961e2f0abe026258a25006f08e9bbaad25b1519a

diff --git a/InstallShield/decyg.pl b/InstallShield/decyg.pl
deleted file mode 100644
index 7bcfd7e..0000000
--- a/InstallShield/decyg.pl
+++ /dev/null
@@ -1,21 +0,0 @@
-#!/usr/bin/perl
-# Patch a DLL or EXE to change the name of the Cygwin DLL it uses or is, so that we can
-# include our own Cygwin DLL that doesn't interfere with the rest of the system, for great justice
-
-@ARGV = ('-') unless @ARGV;
-@FILES = @ARGV;
-while ($ARGV = shift) {
-  $out = $ARGV . ".new";
-  open(IN, $ARGV) or warn "Can't open $ARGV: $!\n";
-  open(OUT, ">$out") or warn "Can't open $out: $!\n";
-  binmode IN;
-  while (<IN>) {
-    s/cygwin1/aybabtu/g;
-    s/c\000y\000g\000w\000i\000n\0001/a\000y\000b\000a\000b\000t\000u/g;
-    print OUT;
-  }
-  close IN;
-  close OUT;
-  unlink $ARGV;
-  rename $out, $ARGV;
-}