From 2fb78cad973765e3471884b8cb404948d40ab2aa Mon Sep 17 00:00:00 2001
From: Drew DeVault <sir@cmpwn.com>
Date: Thu, 19 Nov 2020 10:43:18 -0500
Subject: [PATCH] Fix name of HTML tab in HTML-only emails

---
 themes/alps/message.html | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/themes/alps/message.html b/themes/alps/message.html
index 8d6c425..350ab0a 100644
--- a/themes/alps/message.html
+++ b/themes/alps/message.html
@@ -190,7 +190,13 @@
           {{ if eq $text.PathString .Part.PathString }}
           class="active"
           {{ end }}
-        >Plain text</a>
+        >
+        {{ if eq $text.MIMEType "text/html" }}
+        HTML
+        {{ else }}
+        Plain text
+        {{ end }}
+        </a>
         {{ if and $html $text }}
         {{ if ne $html.PathString $text.PathString }}
         <a