Fix recursive first_part

[app-edwardng.git] / lib / App / EdwardNG.pm

diff --git a/lib/App/EdwardNG.pm b/lib/App/EdwardNG.pm
index 8343b473d0731756366bfe7761a3ca8e3a10202c..f6b54a4254cffe720246bd503447c89763f024ac 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;
+       return first_part ($ent->parts(0)) if $ent->parts;
        stringify [$ent->bodyhandle->as_lines]
 }