enable explicit bypassing of prevent-draft

[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 4c9480306bd45fb8f11dde2b3635404ba1f35dcf..00d7011c75fcc1e5df368e560ace331ac5a11952 100755 (executable)
--- a/.mutt/sendmail-checks.d/prevent-draft
+++ b/.mutt/sendmail-checks.d/prevent-draft
@@ -5,9 +5,15 @@
 # Copyright © 2010 martin f. krafft <madduck@madduck.net>
 # Released under the terms of the Artistic Licence 2.0
 #
-set -eu
+set -eux
+exec 2>&1
 
-if grep -iq '^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)[])]?)' || :)
+
+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 draft tag is present."
   exit 1
 fi
+
+set +x