mirror of
https://github.com/kmein/niveum
synced 2026-03-16 10:11:08 +01:00
48 lines
1.0 KiB
Plaintext
48 lines
1.0 KiB
Plaintext
|
#! /bin/sh
|
||
|
|
set -efu
|
||
|
|
|
||
|
|
reply_to=$(mail-current-query)
|
||
|
|
|
||
|
|
if ! test "$(notmuch search --output=messages "$reply_to" | wc -l)" = 1; then
|
||
|
|
echo "current query doesn't point to exactly one message. abort." >&2
|
||
|
|
exit 1
|
||
|
|
fi
|
||
|
|
|
||
|
|
# TODO update headers
|
||
|
|
|
||
|
|
notmuch reply "$reply_to" |
|
||
|
|
sed '
|
||
|
|
/^Non-text part: /d
|
||
|
|
/^Attachment: /d
|
||
|
|
' |
|
||
|
|
jq -Rrs '
|
||
|
|
# TODO dedup with mail-send
|
||
|
|
split("\n") |
|
||
|
|
index("") as $i |
|
||
|
|
.[:$i] as $head |
|
||
|
|
.[$i:] as $body |
|
||
|
|
|
||
|
|
{
|
||
|
|
"MIME-Version": "1.0",
|
||
|
|
"Content-Type": "text/plain; charset=UTF-8; format=flowed",
|
||
|
|
"Content-Transfer-Encoding": "8bit"
|
||
|
|
} as $extra_head |
|
||
|
|
|
||
|
|
($extra_head | keys | join("|")) as $extra_head_regex |
|
||
|
|
($extra_head | to_entries | map("\(.key): \(.value)")) as $extra_head_lines |
|
||
|
|
|
||
|
|
# TODO each of these could be followed by multiple lines starting with spaces
|
||
|
|
($head | map(select(test("^(\($extra_head_regex)):";"i") | not))) as $head |
|
||
|
|
|
||
|
|
($head + $extra_head_lines) as $head |
|
||
|
|
|
||
|
|
($head + $body) | join("\n")
|
||
|
|
'
|
||
|
|
|
||
|
|
|
||
|
|
# TODO fix From:
|
||
|
|
# TODO tune quote
|
||
|
|
|
||
|
|
# TODO write draft
|
||
|
|
# TODO send mail
|