Mercurial > hg > Applications > mh
view miscellany/mtrenv/bin/again @ 0:bce86c4163a3
Initial revision
author | kono |
---|---|
date | Mon, 18 Apr 2005 23:46:02 +0900 |
parents | |
children |
line wrap: on
line source
: run this script through /bin/sh : PATH=:/bin:/usr/bin:/usr/ucb:/usr/uci:/usr/uci/lib/mh; export PATH F="" M="" S="" for A in $* do case $A in +*|@*) case $F in "") F=$A ;; *) echo "replf: only one folder at a time" 1>&2 exit 1 ;; esac ;; *) S="$S $A" ;; esac done prf=/tmp/prf$$ ctx=/tmp/ctx$$ trap "rm -f $prf $ctx" 0 1 2 3 13 15 rm -f $prf echo "MH-Sequences:" > $prf echo "Previous-Sequence: pseq" >> $prf cat ${MH-$HOME/.mh_profile} >> $prf MH="$prf" ; export MH rm -f $ctx cp ${MHCONTEXT-`mhpath +`/context} $ctx MHCONTEXT="$ctx" ; export MHCONTEXT if burst $F -noinplace; then mark -delete -seq pseq last M="`pick pseq`" comp -draftfolder @ last -editor vi -use $S rmm $M else exit 1 fi exit 0