From: Marius Gavrilescu <marius@ieval.ro>
Date: Tue, 8 Jul 2014 07:39:24 +0000 (+0300)
Subject: Fix recursive first_part
X-Git-Url: http://git.ieval.ro/?a=commitdiff_plain;h=d03d611f3dd49549200b266ff84b70bd7a69ba4f;p=app-edwardng.git

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]
 }