Received: from mail.cmpwn.com (mail.cmpwn.com [45.56.77.53])
	by mail-b.sr.ht (Postfix) with ESMTPS id 88037FF0AF
	for <~emersion/alps-dev@lists.sr.ht>; Wed, 20 May 2020 19:32:54 +0000 (UTC)
Authentication-Results: mail-b.sr.ht;
	dkim=pass (1024-bit key) header.d=cmpwn.com header.i=@cmpwn.com header.b=DOASFk7K
DKIM-Signature: v=1; a=rsa-sha256; c=simple/simple; d=cmpwn.com; s=cmpwn;
	t=1590003173; bh=yztoJ9RcWlv5wWu+XmtOnYegWyB/6oS/uo56wJq+Ct0=;
	h=From:To:Cc:Subject:Date;
	b=DOASFk7Ku4AjfYSHmh0EzYNuMAsIJRemkOwIAAYFLJxfQw5uXDyfXztriruTq6zJc
	 9YOG9pqtN8qZ4FrUHm1WZ3VfKRBlpFVoCDVdMmQNklr+jWy6x7AWDhOP8xZ6QikouH
	 n8gCalUvUgXEXq8EBbsRlX/sRU3r/isyM7En3wos=
From: Drew DeVault <sir@cmpwn.com>
To: ~emersion/alps-dev@lists.sr.ht
Cc: Drew DeVault <sir@cmpwn.com>
Subject: [PATCH] alps theme: add button to load remote content
Date: Wed, 20 May 2020 15:32:52 -0400
Message-Id: <20200520193252.138655-1-sir@cmpwn.com>
X-Mailer: git-send-email 2.26.2
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: quoted-printable

---
 themes/alps/assets/style.css |  7 +++++++
 themes/alps/message.html     | 10 ++++++++++
 2 files changed, 17 insertions(+)

diff --git a/themes/alps/assets/style.css b/themes/alps/assets/style.css
index 9d51f45..f91a271 100644
--- a/themes/alps/assets/style.css
+++ b/themes/alps/assets/style.css
@@ -197,6 +197,13 @@ main.message th,
 main.event th { width: 5%;}
 main.message h1,
 main.event h1 { font-size: 1.2rem; padding: 0.5rem;}
+main.message .remote-content {
+  background: #eeffee;
+}
+
+main.message .remote-content td {
+  color: black;
+}
=20
 main.message pre,
 main.message iframe,
diff --git a/themes/alps/message.html b/themes/alps/message.html
index 6e88297..521e835 100644
--- a/themes/alps/message.html
+++ b/themes/alps/message.html
@@ -168,6 +168,16 @@
             <td>{{template "addr-list" .Message.Envelope.Bcc}}</td>
           </tr>
           {{ end }}
+          {{if and .Extra.HasRemoteResources (not .Extra.RemoteResources=
Allowed)}}
+          <tr class=3D"remote-content">
+            <td colspan=3D"2">
+              This message contains remote content, such as external ima=
ges.
+              <a href=3D"?part=3D{{.Part.PathString}}&allow-remote-resou=
rces=3D1">
+                Load remote content =C2=BB
+              </a>
+            </td>
+          </tr>
+          {{end}}
         </table>
         <section class=3D"parts">
           {{template "message-part-tree" (tuple $ .Message.PartTree)}}
--=20
2.26.2