#!/bin/sh
#
# prevent-draft – prevent sending a message while an X-Draft header exists
#
# Copyright © 2010 martin f. krafft <madduck@madduck.net>
# Released under the terms of the Artistic Licence 2.0
#
set -eu

if egrep -iq '^(X-Draft:|Subject:.*[[(]?(Draft|Entwurf)[])]?)' $1; 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