email2pdf: management of non multipart/alternative mails

git-svn-id: http://svn.freeswitch.org/svn/freeswitch/trunk/contrib@15695 d0543943-73ff-0310-b7d9-9358b9ac24b2

sathieu/email2pdf/email2pdf

@@ -187,7 +187,7 @@ sub process_raw
 sub process_header
 {
 	my $parsed = shift;
-	unshift @files, (0);
+	unshift @files, (0) if $files[0] != 0;
 	# define template variables for replacement
 	my $vars = {
 		body => '', #$parsed->body,