From 6665b96320392f0829892137feb21df759522c68 Mon Sep 17 00:00:00 2001 From: Peter Palfrader Date: Thu, 2 Jan 2003 21:24:32 +0000 Subject: Always use --no-secmem-warning with GnuPG calls --- Echolot/Conf.pm | 4 ++-- Echolot/Pinger/CPunk.pm | 6 +++--- Echolot/Stats.pm | 6 +++--- NEWS | 3 ++- 4 files changed, 10 insertions(+), 9 deletions(-) diff --git a/Echolot/Conf.pm b/Echolot/Conf.pm index 271b14c..d8e6939 100644 --- a/Echolot/Conf.pm +++ b/Echolot/Conf.pm @@ -1,7 +1,7 @@ package Echolot::Conf; # (c) 2002 Peter Palfrader -# $Id: Conf.pm,v 1.30 2002/09/21 01:45:39 weasel Exp $ +# $Id: Conf.pm,v 1.31 2003/01/02 21:24:32 weasel Exp $ # =pod @@ -364,7 +364,7 @@ sub parse_cpunk_key($$$) { my $pid = $GnuPG->wrap_call( commands => [qw{--with-colons}], - command_args => [qw{--no-options --no-default-keyring --fast-list-mode}], + command_args => [qw{--no-options --no-secmem-warning --no-default-keyring --fast-list-mode}], handles => $handles ); print $stdin_fh $key; close($stdin_fh); diff --git a/Echolot/Pinger/CPunk.pm b/Echolot/Pinger/CPunk.pm index f051216..f8e5b43 100644 --- a/Echolot/Pinger/CPunk.pm +++ b/Echolot/Pinger/CPunk.pm @@ -1,7 +1,7 @@ package Echolot::Pinger::CPunk; # (c) 2002 Peter Palfrader -# $Id: CPunk.pm,v 1.8 2003/01/02 20:04:50 weasel Exp $ +# $Id: CPunk.pm,v 1.9 2003/01/02 21:24:32 weasel Exp $ # =pod @@ -54,7 +54,7 @@ sub encrypt_to($$$$) { ); my $pid = $GnuPG->wrap_call( commands => [ '--import' ], - command_args => [qw{--no-options --no-default-keyring --fast-list-mode --keyring}, $keyring, '--', '-' ], + command_args => [qw{--no-options --no-secmem-warning --no-default-keyring --fast-list-mode --keyring}, $keyring, '--', '-' ], handles => $handles ); print $stdin_fh $keys->{$recipient}->{'key'}; close($stdin_fh); @@ -99,7 +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, '--recipient', $recipient]; + my $command_args = [qw{--no-options --no-secmem-warning --always-trust --no-default-keyring --cipher-algo 3DES --keyring}, $keyring, '--recipient', $recipient]; my $plaintextfile; if ($pgp2compat) { #pgp2compat requires files, cannot use stdin diff --git a/Echolot/Stats.pm b/Echolot/Stats.pm index 7fa46bd..fb9e10d 100644 --- a/Echolot/Stats.pm +++ b/Echolot/Stats.pm @@ -1,7 +1,7 @@ package Echolot::Stats; # (c) 2002 Peter Palfrader -# $Id: Stats.pm,v 1.36 2002/12/18 17:31:00 weasel Exp $ +# $Id: Stats.pm,v 1.37 2003/01/02 21:24:32 weasel Exp $ # =pod @@ -693,7 +693,7 @@ sub build_pgpring_type($$$$) { ); my $pid = $GnuPG->wrap_call( commands => [ '--import' ], - command_args => [qw{--no-options --no-default-keyring --fast-list-mode --keyring}, $keyring, '--', '-' ], + command_args => [qw{--no-options --no-secmem-warning --no-default-keyring --fast-list-mode --keyring}, $keyring, '--', '-' ], handles => $handles ); print $stdin_fh $key{'key'}; close($stdin_fh); @@ -737,7 +737,7 @@ sub build_pgpring_export($$$$) { ); my $pid = $GnuPG->wrap_call( commands => [ '--export' ], - command_args => [qw{--no-options --no-default-keyring --keyring}, $keyring, @$keyids ], + command_args => [qw{--no-options --no-secmem-warning --no-default-keyring --keyring}, $keyring, @$keyids ], handles => $handles ); close($stdin_fh); diff --git a/NEWS b/NEWS index 582eb28..21f0bd8 100644 --- a/NEWS +++ b/NEWS @@ -2,7 +2,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 + it is broken with at least GnuPG 1.2.1. + * Always use --no-secmem-warning with GnuPG calls. Changes in version 2.0.7 - 2002-12-18 * Added upgrade HOWTO. -- cgit v1.2.3