default argument to confvars

[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..314dfd386c22e4fd97f11b2ff740309882fddf7d 100755 (executable)
--- a/.mutt/sendmail-checks.d/prevent-draft
+++ b/.mutt/sendmail-checks.d/prevent-draft
@@ -7,7 +7,11 @@
 #
 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:|(To|Cc):.*[-_]DRAFT)' || :)
+
+if [ -n "$draft_headers" ]; then
+  echo "$draft_headers" | egrep -iq '^X-Draft: (ok|no)' && exit 0
+  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