Quote decrypted message

diff --git a/lib/App/EdwardNG.pm b/lib/App/EdwardNG.pm
index e778d6a20b70f6c065ca5a6f47b1c89a44238976..a9cac089365c515bf4f89e67d2b7a7c3d17b1d8d 100644 (file)
--- a/lib/App/EdwardNG.pm
+++ b/lib/App/EdwardNG.pm
@@ -33,7 +33,7 @@ sub mg {
 sub first_part{
        my ($ent) = @_;
        return first_part $ent->parts(0) if $ent->parts;
-       $ent->bodyhandle->as_string
+       stringify [$ent->bodyhandle->as_lines]
 }
 
 sub process_message {