diff options
| author | Peter Palfrader <peter@palfrader.org> | 2003-02-22 19:08:55 +0000 |
|---|---|---|
| committer | Peter Palfrader <peter@palfrader.org> | 2003-02-22 19:08:55 +0000 |
| commit | dca6c6b907f51749cc526988853fabcb9af4d7d9 (patch) | |
| tree | 680b4adcd181feaee34a6e16e27e24159140fab0 | |
| parent | cb81b596e7c096e811cc5c95111ba7967b159035 (diff) | |
Reliable and CRLF - a neverending (sad) story - works now (for real)
| -rw-r--r-- | Echolot/Pinger/CPunk.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/Echolot/Pinger/CPunk.pm b/Echolot/Pinger/CPunk.pm index e5e9bf6..9379ee4 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.18 2003/02/21 22:59:40 weasel Exp $ +# $Id: CPunk.pm,v 1.19 2003/02/22 19:08:55 weasel Exp $ # =pod @@ -99,7 +99,7 @@ sub encrypt_to($$$$) { stderr => $stderr_fh, status => $status_fh ); - my $command_args = [qw{--no-options --no-secmem-warning --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 --textmode --cipher-algo 3DES --keyring}, $keyring, '--recipient', $recipient]; my $plaintextfile; #if ($pgp2compat) { @@ -190,7 +190,7 @@ sub ping($$$$$) { $with_from = 0; }; # "Latent-Time: +0\n". - $msg = "::\r\n". + $msg = "::\n". "Anon-To: $to\n". "\n". $header. |