From: Marius Gavrilescu Date: Tue, 8 Jul 2014 07:39:24 +0000 (+0300) Subject: Fix recursive first_part X-Git-Url: http://git.ieval.ro/?p=app-edwardng.git;a=commitdiff_plain;h=d03d611f3dd49549200b266ff84b70bd7a69ba4f Fix recursive first_part --- diff --git a/lib/App/EdwardNG.pm b/lib/App/EdwardNG.pm index 8343b47..f6b54a4 100644 --- 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] }