X-Git-Url: http://git.ozlabs.org/?a=blobdiff_plain;f=send_email;h=b2b1b54cb92927973c1d01bc67fbb1cd2f9a7ea4;hb=HEAD;hp=de418730b6a0776d2aaa5e6a49d60c9ca44b98ef;hpb=9064ba9aab9c9222ade4c0738922a790c87ce107;p=next-scripts

diff --git a/send_email b/send_email
index de41873..b2b1b54 100755
--- a/send_email
+++ b/send_email
@@ -1,17 +1,33 @@
 #!/bin/bash
 
+mail_dir=$(realpath --relative-to=. "$(dirname "$0")/../mails")
+printf -v TARGET '%s/%(%Y-%m-%d+%s)T.email' "$mail_dir" -1
+
+subject="$1"
+shift
 to="$1"
-cc="$2"
-subject="$3"
+shift
+readarray -t cc < <(printf '%s\n' "$@" | sort -u)
 
-(
-	cat <<EOF
-To: $to
-Cc: $cc
-Subject: $subject
+for i in "${!cc[@]}"; do
+	e=${cc[$i]##*<}
+	e=${e%%>*}
+	if grep -q -F "<$e>" <<<"$to"; then
+		unset "cc[$i]"
+	fi
+done
 
-EOF
+{
+	printf 'To: %s\n' "$to"
+	if [ "${#cc[@]}" -gt 0 ]; then
+		printf 'Cc: %s\n' "${cc[@]}"
+	fi
+	printf 'Subject: %s\n\n' "$subject"
 	cat
-) | claws-mail --compose-from-file -
+} > "$TARGET"
+
+gvim "$TARGET"
+
+printf 'When you are finished editing you need to send %s\n' "$TARGET"
 
 exit 0