Add custom repl*comps to honor LOCALMAILBOX env variable - dotfiles - leot's dotfiles
(HTM) hg clone https://bitbucket.org/iamleot/dotfiles
(DIR) Log
(DIR) Files
(DIR) Refs
---
(DIR) changeset 1e7aa4db5d81670272f9abf85fd40ce0b1217968
(DIR) parent 0c467494c0cb5f9df791b5249f5dba8e8e2ad3a2
(HTM) Author: Leonardo Taccari <iamleot@gmail.com>
Date: Sat, 25 May 2019 23:58:10
Add custom repl*comps to honor LOCALMAILBOX env variable
Diffstat:
Mail/replcomps | 42 ++++++++++++++++++++++++++++++++++++++++++
Mail/replgroupcomps | 50 ++++++++++++++++++++++++++++++++++++++++++++++++++
2 files changed, 92 insertions(+), 0 deletions(-)
---
diff -r 0c467494c0cb -r 1e7aa4db5d81 Mail/replcomps
--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/Mail/replcomps Sat May 25 23:58:10 2019 +0200
@@ -0,0 +1,42 @@
+%; replcomps - our default component file for "repl"
+%;
+%;
+%; First, output a "From" header.
+%(void(getenv LOCALMAILBOX))%(void(width))%(putaddr From: )
+%;
+%; These next lines slurp in lots of addresses for To: and cc:.
+%; Use with repl -query or else you may get flooded with addresses!
+%; Currently %(decode) should NOT be used on address fields, in case invalid
+%; characters are in an address.
+%;
+%; If no To:/cc:/Fcc: text, we output empty fields for prompter to fill in.
+%;
+%(lit)%(formataddr{reply-to})\
+%(formataddr %<{from}%(void{from})%|%(void{apparently-from})%>)\
+%(formataddr{resent-to})\
+%(formataddr{prev-resent-to})\
+%(formataddr{x-to})\
+%(formataddr{apparently-to})\
+%(void(width))%(putaddr To: )
+%(lit)%(formataddr{to})\
+%(formataddr{cc})\
+%(formataddr{x-cc})\
+%(formataddr{resent-cc})\
+%(formataddr{prev-resent-cc})\
+%(formataddr(localmbox))\
+%(void(width))%(putaddr cc: )
+Fcc: %<{fcc}%{fcc}%|+outbox%>
+Subject: %<{subject}Re: %(void{subject})%(trim)%(putstr)%>
+%;
+%; Make References: and In-reply-to: fields for threading.
+%; Use (void), (trim) and (putstr) to eat trailing whitespace.
+%;
+%<{message-id}In-reply-to: %{message-id}\n%>\
+%<{message-id}References: \
+%<{references}%(void{references})%(trim)%(putstr) %>\
+%(void{message-id})%(trim)%(putstr)\n%>\
+Comments: In-reply-to \
+%<{from}%(void{from})%?(void{apparently-from})%|%(void{sender})%>\
+%(trim)%(putstr)\n\
+ message dated "%<(nodate{date})%{date}%|%(tws{date})%>."
+--------
diff -r 0c467494c0cb -r 1e7aa4db5d81 Mail/replgroupcomps
--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/Mail/replgroupcomps Sat May 25 23:58:10 2019 +0200
@@ -0,0 +1,50 @@
+%; replgroupcomps
+%;
+%; form (components) file for `repl -group'
+%;
+%; Check the following headers to create reply addresses.
+%;
+%; To: Mail-Followup-To
+%;
+%; OR
+%;
+%; To: Mail-Reply-To (or)
+%; Reply-To (or)
+%; From (or)
+%; Sender (or)
+%; Return-Path
+%;
+%; AND
+%;
+%; cc: To (and)
+%; cc (and)
+%; personal address
+%;
+%; Note that addresses should not have %(decode) run on them in case invalid
+%; characters are in the address field.
+%;
+%(void(getenv LOCALMAILBOX))%(void(width))%(putaddr From: )
+%(lit)%(formataddr{mail-followup-to})\
+%<(nonnull)%(void(width))%(putaddr To: )\n\
+%(putaddr Mail-Followup-To: )\n\
+%|\
+%(lit)%(formataddr %<{mail-reply-to}%?{reply-to}%?{from}%?{sender}%?{return-path}%>)\
+%<(nonnull)%(void(width))%(putaddr To: )\n%>\
+%(lit)%(formataddr{to})%(formataddr{cc})%(formataddr(localmbox))\
+%<(nonnull)%(void(width))%(putaddr cc: )\n%>%>\
+%;
+Fcc: %<{fcc}%{fcc}%|+outbox%>
+Subject: %<{subject}Re: %(void{subject})%(trim)%(putstr)%>
+%;
+%; Make References: and In-reply-to: fields for threading.
+%; Use (void), (trim) and (putstr) to eat trailing whitespace.
+%;
+%<{message-id}In-reply-to: %{message-id}\n%>\
+%<{message-id}References: \
+%<{references}%(void{references})%(trim)%(putstr) %>\
+%(void{message-id})%(trim)%(putstr)\n%>\
+Comments: In-reply-to \
+%<{from}%(void{from})%?(void{apparently-from})%|%(void{sender})%>\
+%(trim)%(putstr)\n\
+ message dated "%<(nodate{date})%{date}%|%(tws{date})%>."
+--------