also check for -DRAFT tag in receipient fields

[etc/mutt.git] / .mutt / sendmail-checks.d / prevent-draft

diff --git a/.mutt/sendmail-checks.d/prevent-draft b/.mutt/sendmail-checks.d/prevent-draft
index 5c83ceb339749ee60cc9bf4b6ff1a1a970f4bb6e..ed30026f376a807eab77570233c171a7a806b597 100755 (executable)
--- a/.mutt/sendmail-checks.d/prevent-draft
+++ b/.mutt/sendmail-checks.d/prevent-draft
@@ -7,7 +7,10 @@
 #
 set -eu
 
 #
 set -eu
 

-if grep -q '^X-Draft:' $1; then
-  echo >&2 "E: will not send this message while the X-Draft header is present"
+draft_headers=$(sed -ne '1,/^$/p' "$1" | egrep -i '^(X-Draft:|Subject:.*[[(]?(Draft|Entwurf)[])]?|(To|Cc):.*[-_]DRAFT)' || :)
+
+if [ -n "$draft_headers" ] && ! echo "$draft_headers" | egrep -viq '^X-Draft: (ok|no)'; then
+  echo >&2 "E: will not send this message while the X-Draft header or"
+  echo >&2 "E: a subject or receipient draft tag is present."

   exit 1
 fi
   exit 1
 fi