r30188 - in /trunk/libgnupg-perl/debian: changelog patches/decrypt.patch patches/series

[gregoa at users.alioth.debian.org]

Author: gregoa
Date: Tue Jan 27 17:59:15 2009
New Revision: 30188

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=30188
Log:
TODO: check patch decrypt.patch and see if it actually closes a bug
(#XXXXXX in changelog and the patch)
at least the test pass now.
speaking of tests: do buildds have enough entropy to generate a key?

* Add patch decrypt.patch: read the whole status on symmetric description
(closes: #XXXXXX).

Added:
    trunk/libgnupg-perl/debian/patches/decrypt.patch
Modified:
    trunk/libgnupg-perl/debian/changelog
    trunk/libgnupg-perl/debian/patches/series

Modified: trunk/libgnupg-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgnupg-perl/debian/changelog?rev=30188&op=diff
==============================================================================
--- trunk/libgnupg-perl/debian/changelog (original)
+++ trunk/libgnupg-perl/debian/changelog Tue Jan 27 17:59:15 2009
@@ -1,5 +1,10 @@
 libgnupg-perl (0.09-10) UNRELEASED; urgency=low
 
+  TODO: check patch decrypt.patch and see if it actually closes a bug
+        (#XXXXXX in changelog and the patch)
+        at least the test pass now.
+        speaking of tests: do buildds have enough entropy to generate a key?
+  
   * Take over for the Debian Perl Group on maintainer's request:
     http://lists.debian.org/debian-perl/2009/01/msg00120.html
   * debian/control: Added: Vcs-Svn field (source stanza); Vcs-Browser field
@@ -18,6 +23,8 @@
     upstream's version.
   * Add new patch import_ok.patch, gnupg now responds with IMPORT_OK instead
     of IMPORT_RES.
+  * Add patch decrypt.patch: read the whole status on symmetric description
+    (closes: #XXXXXX).
 
  -- gregor herrmann <gregoa at debian.org>  Tue, 27 Jan 2009 16:41:51 +0100
 

Added: trunk/libgnupg-perl/debian/patches/decrypt.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgnupg-perl/debian/patches/decrypt.patch?rev=30188&op=file
==============================================================================
--- trunk/libgnupg-perl/debian/patches/decrypt.patch (added)
+++ trunk/libgnupg-perl/debian/patches/decrypt.patch Tue Jan 27 17:59:15 2009
@@ -1,0 +1,25 @@
+Author: gregor herrmann <gregoa at debian.org>
+Description: read the whole output on decryption
+Bugs: #XXXXXX
+
+--- a/GnuPG.pm
++++ b/GnuPG.pm
+@@ -739,12 +739,17 @@
+ 
+ 	$sig = $self->decrypt_postread() unless $args{tie_mode};
+     } else {
++	my $decryption_ok;
+ 	# gnupg 1.0.2 adds this status message
+ 	( $cmd, $arg ) = $self->read_from_status()
+ 	  if $cmd =~ /BEGIN_DECRYPTION/;
++
++	while ( $self->read_from_status() ) {
++          ( $decryption_ok = $cmd ) =~ /DECRYPTION_OKAY/;
++        }
+ 
+ 	$self->abort_gnupg( "invalid passphrase" )
+-	  unless $cmd =~ /DECRYPTION_OKAY/;
++	  unless $decryption_ok;
+     }
+ 
+     $self->end_gnupg() unless $args{tie_mode};

Modified: trunk/libgnupg-perl/debian/patches/series
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgnupg-perl/debian/patches/series?rev=30188&op=diff
==============================================================================
--- trunk/libgnupg-perl/debian/patches/series (original)
+++ trunk/libgnupg-perl/debian/patches/series Tue Jan 27 17:59:15 2009
@@ -4,3 +4,4 @@
 policy_url.patch
 strict_subs.patch
 import_ok.patch
+decrypt.patch