1 : run this script through /bin/sh
2 : usage: rcvtrip address
5 echo "usage: rcvstrip address" 1>&2
9 db=rcvtrip draftf=drafts field=advised form=tripcomps
10 : RP_MECH=200 RP_MOK=32 RP_OK=9
11 RP_MECH=1 RP_MOK=0 RP_OK=0
13 prf=/tmp/prf$$ ctx=/tmp/ctx$$ tmp=/tmp/rcvtrip$$
14 trap "rm -f $prf $ctx $tmp" 0 1 2 3 13 15
17 echo "MH-Sequences:" > $prf
18 cat ${MH-$HOME/.mh_profile} >> $prf
22 cp ${MHCONTEXT-`mhpath +`/context} $ctx
23 MHCONTEXT="$ctx" ; export MHCONTEXT
28 from=`ap -format "%<error%|%mbox%<host@%host%>%>" "$1"`
30 if pick --$field "$from" +$db first; then exit ${RP_MOK}; fi
35 if repl -cc all -whatnowproc send -file $tmp -form $form -draftfolder +$draftf;
36 then anno -component $field -text "$from" +$db first;