diff -r 8efaf6179ee8 -r 677e250ac544 bin/resign-revoked --- 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"; - -}