barnowl/zcrypt.pl: Fix a syntax error.

[snippets/.git] / barnowl / zcrypt.pl

diff --git a/barnowl/zcrypt.pl b/barnowl/zcrypt.pl
index 75d73a7338a18abe02519fdf4b3ac5e481c76fd0..38efafe2197e045da08dedeeeb6480a30938229d 100644 (file)
--- a/barnowl/zcrypt.pl
+++ b/barnowl/zcrypt.pl
@@ -25,7 +25,7 @@ BarnOwl::new_command(decrypt => sub {
    my ($zo, $zi);
    my $pid = open2($zo, $zi, '/mit/outland/bin/zcrypt', '-D', @args) or die "Couldn't launch zcrypt\n";
    my $decrypted;
-   print $zi $msg->body . "\n";
+   print $zi @{$msg->fields}[1] . "\n";
    close $zi;
    while (<$zo>) {
       chomp;