summaryrefslogtreecommitdiff
path: root/archive/bin/capture-mail
blob: a34b894edb5cfc563123b2beabeeb78589f19ed3 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
#!/bin/zsh

msg=$(cat /dev/stdin)

id=$(echo $msg | grep -i "^Message-ID:" | sed "s/^Message-I[dD]: //")
from=$(echo $msg | grep -m 1 -i "^From:" | sed "s/^From: //" | sed "s/<.*$//" | sed 's/"//g' | sed 's/ $//')
subject=$(echo $msg | grep -m 1 -i "^Subject:" | sed "s/^Subject: //")

save-org-buffers

echo "* TODO E-mail \"$subject\" from $from" >>$HOME/doc/org/refile.org
echo "# Message-Id: $id" >>$HOME/doc/org/refile.org
#emacsclient -t -e '(spw/end-of-refile)'