From c17f5c76eebea170e27add0d23b1f03faa17fffe Mon Sep 17 00:00:00 2001
From: Anachron <gith@cron.world>
Date: Fri, 22 Apr 2022 08:38:36 +0200
Subject: [PATCH] mcom: Add sendhook

---
 mcom | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/mcom b/mcom
index d60070e..5bcfdc7 100755
--- a/mcom
+++ b/mcom
@@ -104,6 +104,7 @@ sendmail=$(mhdr -h sendmail "$MBLAZE/profile")
 sendmail_args=$(mhdr -h sendmail-args "$MBLAZE/profile")
 sendmail="${sendmail:-sendmail} ${sendmail_args:--t}"
 default_from=$(mhdr -h local-mailbox "$MBLAZE/profile")
+sendhook=$(mhdr -h sendhook "$MBLAZE/profile")
 
 defaultc=e
 
@@ -440,7 +441,7 @@ while :; do
 				if $sendmail <"$draftmime"; then
 					if [ "$outbox" ]; then
 						mv "$draftmime" "$draft"
-						mflag -d -S "$draft"
+						${sendhook:-mflag -d -S} "$draft"
 					else
 						rm "$draft" "$draftmime"
 					fi
@@ -458,7 +459,7 @@ while :; do
 				stampdate "$draft"
 				if $sendmail <"$draft"; then
 					if [ "$outbox" ]; then
-						mflag -d -S "$draft"
+						${sendhook:-mflag -d -S} "$draft"
 					else
 						rm "$draft"
 					fi