r58426 - in /trunk/libgnupg-perl/debian: changelog patches/ patches/0001-Remove-an-intervening-shell-fixing-process-ID-tracking.patch patches/series

carnil-guest at users.alioth.debian.org carnil-guest at users.alioth.debian.org
Tue May 25 09:29:47 UTC 2010


Author: carnil-guest
Date: Tue May 25 09:29:10 2010
New Revision: 58426

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=58426
Log:
Add 0001-Remove-an-intervening-shell-fixing-process-ID-tracking.patch from
Niko Tyni to fix FTBFS as test hangs. (Closes: #583072).

Added:
    trunk/libgnupg-perl/debian/patches/
    trunk/libgnupg-perl/debian/patches/0001-Remove-an-intervening-shell-fixing-process-ID-tracking.patch
    trunk/libgnupg-perl/debian/patches/series
Modified:
    trunk/libgnupg-perl/debian/changelog

Modified: trunk/libgnupg-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgnupg-perl/debian/changelog?rev=58426&op=diff
==============================================================================
--- trunk/libgnupg-perl/debian/changelog (original)
+++ trunk/libgnupg-perl/debian/changelog Tue May 25 09:29:10 2010
@@ -1,3 +1,10 @@
+libgnupg-perl (0.16-2) UNRELEASED; urgency=low
+
+  * Add 0001-Remove-an-intervening-shell-fixing-process-ID-tracking.patch from
+    Niko Tyni to fix FTBFS as test hangs. (Closes: #583072).
+
+ -- Salvatore Bonaccorso <salvatore.bonaccorso at gmail.com>  Tue, 25 May 2010 11:19:31 +0200
+
 libgnupg-perl (0.16-1) unstable; urgency=low
 
   [ Jonathan Yu ]

Added: trunk/libgnupg-perl/debian/patches/0001-Remove-an-intervening-shell-fixing-process-ID-tracking.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgnupg-perl/debian/patches/0001-Remove-an-intervening-shell-fixing-process-ID-tracking.patch?rev=58426&op=file
==============================================================================
--- trunk/libgnupg-perl/debian/patches/0001-Remove-an-intervening-shell-fixing-process-ID-tracking.patch (added)
+++ trunk/libgnupg-perl/debian/patches/0001-Remove-an-intervening-shell-fixing-process-ID-tracking.patch Tue May 25 09:29:10 2010
@@ -1,0 +1,47 @@
+From fe5e211c07b8c009a952ef46ccfdceed6fcc9bd2 Mon Sep 17 00:00:00 2001
+From: Niko Tyni <ntyni at debian.org>
+Date: Tue, 25 May 2010 11:55:48 +0300
+Subject: [PATCH] Remove an intervening shell, fixing process ID tracking
+
+cpr_send() needs to know the PID of the child gpg process,
+but it was masked by the intervening shell. Call exec() with
+the list form instead, fixing the few places where whitespace
+was used instead of separate list elements.
+---
+ GnuPG.pm |    6 +++---
+ 1 files changed, 3 insertions(+), 3 deletions(-)
+
+diff --git a/GnuPG.pm b/GnuPG.pm
+index 3e49c31..7d89b8d 100644
+--- a/GnuPG.pm
++++ b/GnuPG.pm
+@@ -259,7 +259,7 @@ sub run_gnupg($) {
+           or die "can't open $self->{output} for output: $!\n";
+     } elsif ( $self->{output} ) {
+       my $gpg = shift(@{$cmdline});
+-      unshift(@{$cmdline}, '--output ' . $self->{output});
++      unshift(@{$cmdline}, '--output' , $self->{output});
+       unshift(@{$cmdline}, $gpg);
+     } # Defaults to stdout
+ 
+@@ -278,7 +278,7 @@ sub run_gnupg($) {
+ 
+     print STDERR "GnuPG: executing `" . join(' ', @$cmdline) . "`" if $self->{trace};
+ 
+-    exec ( join(' ', @$cmdline) )
++    exec @$cmdline
+       or CORE::die "can't exec gnupg: $!\n";
+     }
+ }
+@@ -532,7 +532,7 @@ sub encrypt($%) {
+     my $options = [];
+     croak ( "no recipient specified\n" )
+       unless $args{recipient} or $args{symmetric};
+-    push @$options, "--recipient" => "'" . $args{recipient} . "'";
++    push @$options, "--recipient" => $args{recipient};
+ 
+     push @$options, "--sign"        if $args{sign};
+     croak ( "can't sign an symmetric encrypted message\n" )
+-- 
+1.7.1
+

Added: trunk/libgnupg-perl/debian/patches/series
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgnupg-perl/debian/patches/series?rev=58426&op=file
==============================================================================
--- trunk/libgnupg-perl/debian/patches/series (added)
+++ trunk/libgnupg-perl/debian/patches/series Tue May 25 09:29:10 2010
@@ -1,0 +1,1 @@
+0001-Remove-an-intervening-shell-fixing-process-ID-tracking.patch




More information about the Pkg-perl-cvs-commits mailing list