From 566cc99380a23a0f1ea6b2018f6fdbc3dffe698d Mon Sep 17 00:00:00 2001
From: Peter Palfrader <peter@palfrader.org>
Date: Thu, 2 Jan 2003 20:04:50 +0000
Subject: Don't use GnuPG::Interface's recipients when encrypting any more as
 it is broken with at least GnuPG 1.2.1

---
 Echolot/Pinger/CPunk.pm | 14 ++++----------
 NEWS                    |  2 ++
 2 files changed, 6 insertions(+), 10 deletions(-)

diff --git a/Echolot/Pinger/CPunk.pm b/Echolot/Pinger/CPunk.pm
index 1d44759..f051216 100644
--- a/Echolot/Pinger/CPunk.pm
+++ b/Echolot/Pinger/CPunk.pm
@@ -1,7 +1,7 @@
 package Echolot::Pinger::CPunk;
 
 # (c) 2002 Peter Palfrader <peter@palfrader.org>
-# $Id: CPunk.pm,v 1.7 2002/09/05 15:12:01 weasel Exp $
+# $Id: CPunk.pm,v 1.8 2003/01/02 20:04:50 weasel Exp $
 #
 
 =pod
@@ -85,8 +85,7 @@ sub encrypt_to($$$$) {
 
 
 	$GnuPG->options->hash_init(
-		armor   => 1,
-		recipients => [ $recipient ] );
+		armor   => 1 );
 
 	( $stdin_fh, $stdout_fh, $stderr_fh, $status_fh )
 		= ( IO::Handle->new(),
@@ -100,8 +99,7 @@ sub encrypt_to($$$$) {
 		stderr     => $stderr_fh,
 		status     => $status_fh
 		);
-	my $command_args = [qw{--no-options --always-trust --no-default-keyring --cipher-algo 3DES --keyring}, $keyring];
-	#my $command_args = [qw{--no-default-keyring --always-trust --compress-algo 1 --load-extension idea --rfc1991 --cipher-algo IDEA  --keyring}, $keyring];
+	my $command_args = [qw{--no-options --always-trust --no-default-keyring --cipher-algo 3DES --keyring}, $keyring, '--recipient', $recipient];
 	my $plaintextfile;
 	if ($pgp2compat) {
 		#pgp2compat requires files, cannot use stdin
@@ -118,12 +116,8 @@ sub encrypt_to($$$$) {
 
 
 		push @$command_args, qw{--pgp2}, $plaintextfile;
-		#push @$command_args, qw{--load-extension idea --pgp2}, $plaintextfile;
-		#push @$command_args, qw{--pgp2}, $plaintextfile;
 	} else {
-		#push @$command_args, qw{ --pgp6 };
-		#push @$command_args, qw{--disable-mdc --no-force-v4-certs --no-comment --escape-from --force-v3-sigs --no-ask-sig-expire --no-ask-cert-expire --digest-algo MD5 --compress-algo 1 --cipher-algo 3DES };
-		#push @$command_args, qw{--rfc1991  --no-openpgp --disable-mdc  --no-force-v4-certs  --no-comment --escape-from    --force-v3-sigs   --no-ask-sig-expire --no-ask-cert-expire --digest-algo MD5 --compress-algo 1};
+		# nothing here ATM.
 	};
 		
 
diff --git a/NEWS b/NEWS
index 1ac028a..582eb28 100644
--- a/NEWS
+++ b/NEWS
@@ -1,6 +1,8 @@
 Changes in version
 	* Removed a dupped line from v2legend.
 	* Allow periods in hostname.
+	* Don't use GnuPG::Interface's recipients when encrypting any more as
+	  it is broken with at least GnuPG 1.2.1
 
 Changes in version 2.0.7 - 2002-12-18
 	* Added upgrade HOWTO.
-- 
cgit v1.2.3