--- a/bin/resign-revoked	Mon Sep 19 16:13:57 2011 +0200
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,30 +0,0 @@
-#!/usr/bin/perl
-
-use strict;
-use File::Find;
-use File::Temp;
-
-my $incoming = "/home/apt/incoming";
-
-my @tofix = qw(
-
-  send-config_1.0-1_i386.changes
-
-);
-
-my $dc = qq(gpg --batch --yes --decrypt);
-my $cc = qq(gpg --batch --yes --clearsign);
-
-for (@tofix) {
-
-  my $f = "$incoming/$_";
-
-  print "Attempting to resign [$f] .. ";
-  my $t = File::Temp->new()->filename();
-  my $cmd = "$dc -o $t $f &>/dev/null";
-  open PIPE, "$cmd |"  or warn "Can't open [$cmd |]: [$?] [$!]\n";
-  $cmd = "$cc -o $f $t";
-  open PIPE, "$cmd |"  or warn "Can't open [$cmd |]: [$?] [$!]\n";
-  print "finished\n";
-
-}