Add missing multipart/related function call to beginning of parsing.
diff --git a/parsemail.go b/parsemail.go
index d37e82c..86e360b 100644
--- a/parsemail.go
+++ b/parsemail.go
@@ -43,6 +43,8 @@
email.TextBody, email.HTMLBody, email.Attachments, email.EmbeddedFiles, err = parseMultipartMixed(msg.Body, params["boundary"])
case contentTypeMultipartAlternative:
email.TextBody, email.HTMLBody, email.EmbeddedFiles, err = parseMultipartAlternative(msg.Body, params["boundary"])
+ case contentTypeMultipartRelated:
+ email.TextBody, email.HTMLBody, email.EmbeddedFiles, err = parseMultipartRelated(msg.Body, params["boundary"])
case contentTypeTextPlain:
message, _ := ioutil.ReadAll(msg.Body)
email.TextBody = strings.TrimSuffix(string(message[:]), "\n")