summaryrefslogtreecommitdiff
path: root/Echolot/Pinger
diff options
context:
space:
mode:
Diffstat (limited to 'Echolot/Pinger')
-rw-r--r--Echolot/Pinger/CPunk.pm8
1 files changed, 4 insertions, 4 deletions
diff --git a/Echolot/Pinger/CPunk.pm b/Echolot/Pinger/CPunk.pm
index 435db22..a82e791 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.11 2003/01/14 05:25:35 weasel Exp $
+# $Id: CPunk.pm,v 1.12 2003/02/14 04:56:16 weasel Exp $
#
=pod
@@ -172,8 +172,8 @@ sub encrypt_to($$$$) {
return $result;
};
-sub ping($$$$$) {
- my ($body, $to, $chain, $keys, $pgp2compat) = @_;
+sub ping($$$$) {
+ my ($body, $to, $chain, $keys) = @_;
my $msg = $body;
@@ -184,7 +184,7 @@ sub ping($$$$$) {
$msg;
if ($hop->{'encrypt'}) {
- my $encrypted = encrypt_to($msg, $hop->{'keyid'}, $keys, $pgp2compat);
+ my $encrypted = encrypt_to($msg, $hop->{'keyid'}, $keys, $hop->{'pgp2compat'});
(defined $encrypted) or
Echolot::Log::debug("Encrypted is undefined."),
return undef;