From 418b74c5079a5c27d894c3d542bbdb6f1adcd5ce Mon Sep 17 00:00:00 2001
From: Timo Wilken
Date: Wed, 12 Jun 2024 12:12:38 +0200
Subject: Decode HTML-only emails automatically when replying in aerc

---
 tw/services/desktop.scm                       | 1 +
 tw/services/files/aerc/templates/quoted_reply | 8 ++++++++
 2 files changed, 9 insertions(+)
 create mode 100644 tw/services/files/aerc/templates/quoted_reply

diff --git a/tw/services/desktop.scm b/tw/services/desktop.scm
index 74dec352..6d9edfa8 100644
--- a/tw/services/desktop.scm
+++ b/tw/services/desktop.scm
@@ -483,6 +483,7 @@ proprietary NVIDIA driver?"))
       ("aerc/binds.conf" ,(local-file "files/aerc/binds.conf"))
       ("aerc/filters" ,(local-file "files/aerc/filters" #:recursive? #t))
       ("aerc/stylesets/catppuccin" ,(local-file "files/aerc/catppuccin.conf"))
+      ("aerc/templates" ,(local-file "files/aerc/templates" #:recursive? #t))
       ("vdirsyncer/config" ,(if work?
                                 (local-file "files/vdirsyncer.work.conf")
                                 (local-file "files/vdirsyncer.conf")))
diff --git a/tw/services/files/aerc/templates/quoted_reply b/tw/services/files/aerc/templates/quoted_reply
new file mode 100644
index 00000000..74585ee8
--- /dev/null
+++ b/tw/services/files/aerc/templates/quoted_reply
@@ -0,0 +1,8 @@
+X-Mailer: aerc {{version}}
+
+On {{dateFormat (.OriginalDate | toLocal) "Mon Jan 2, 2006 at 3:04 PM MST"}}, {{(index .OriginalFrom 0).Name}} wrote:
+{{if eq .OriginalMIMEType "text/html"}}
+{{exec `lynx -display_charset=UTF-8 -dump -stdin` .OriginalText | quote}}
+{{else}}
+{{trimSignature .OriginalText | quote}}
+{{end}}
-- 
cgit v1.2.3