convert to bulma css framework

1 files changed, 2 insertions, 4 deletions

diff --git a/lib/JWebmail/View/RenderMail.pm b/lib/JWebmail/View/RenderMail.pm
index 90534dc..387e586 100644
--- a/lib/JWebmail/View/RenderMail.pm
+++ b/lib/JWebmail/View/RenderMail.pm
@@ -112,7 +112,7 @@ sub render_message {
 
     warn "unkown mime-subtype $subtype" unless $subtype eq 'rfc822';
 
-    my $R .= '<div clas="jwm-mail">';
+    my $R .= '<div class="jwm-mail">';
 
     $R .= '<dl class="jwm-mail-header">';
     $R .= '<dt>' . xml_escape(uc $self->c->l('subject')) . '</dt>';
@@ -127,8 +127,6 @@ sub render_message {
     $R .= '<dd>' . to_mime_type($msg->{head}{mime}) . "</dd>\n";
     $R .= "</dl>\n";
 
-    #my $content = ref $msg->{body} && exists $msg->{body}{parts} ? $msg->{body}{parts} : $msg->{body};
-
     $R .= $self->mime_render(to_mime_types($msg->{head}{mime}), $msg->{body}, [@$path, 0]);
 
     return $R . "</div>\n";
@@ -149,7 +147,7 @@ sub mime_render {
     my $renderer = $MIME_Render_Subs{"$maintype/$subtype"} || $MIME_Render_Subs{$maintype};
 
     unless ($renderer) {
-        return "<p>Unsupported MIME type of <code>$maintype/$subtype</code>.</p>\n";
+        return qq(<p class="jwm-body-unsupported">Unsupported MIME type of <code>$maintype/$subtype</code>.</p>\n);
     }
 
     return $renderer->($self, $subtype, $content, $path);