Return to diagram7.tex CVS log

Up to [CSRG BSD Unix] / 43BSD / contrib / mh / papers / realwork

Annotation of 43BSD/contrib/mh/papers/realwork/diagram7.tex, revision 1.1

1.1     ! root        1: % diagram 7
        !             2: 
        !             3: \verbatim
        !             4: : 'mpick - relate messages /mtr'
        !             5: PATH=:/bin:/usr/bin:/usr/ucb:/usr/local:/usr/local/lib/mh; export PATH
        !             6: F="" M="" S=""
        !             7: 
        !             8: for A in $*
        !             9: do
        !            10:     case $A in
        !            11:         -*)     S="$S $A" ;;
        !            12: 
        !            13:         +*|@*)  case $F in
        !            14:                     "")  F=$A ;;
        !            15:                     *)   echo "mpick: only one folder at a time" 1>&2
        !            16:                          exit 1 ;;
        !            17:                 esac ;;
        !            18: 
        !            19:         *)      M="$M $A" ;;
        !            20:     esac
        !            21: done
        !            22: 
        !            23: S="$S -sequence hits -list -nozero"
        !            24: 
        !            25: if mark $F all -add -sequence hits;
        !            26:     then mark $F all -delete -sequence hits;
        !            27:     else exit 1;
        !            28: fi
        !            29: 
        !            30: for A in ${M-cur}
        !            31: do
        !            32:     for C in `mhpath $F $A`
        !            33:     do
        !            34:         if [ -r $C ];
        !            35:             then
        !            36:                 I=`mhl -form mhl.msgid $C`;
        !            37:                 case $I in
        !            38:                     "")  echo "no message-id in message `basename $C`" 1>&2 ;;
        !            39:                     *)   pick --in-reply-to "$I" $S ;;
        !            40:                 esac
        !            41:             else
        !            42:                 echo "message $A doesn't exist" 1>&2; exit 1;
        !            43:         fi
        !            44:     done
        !            45: done
        !            46: 
        !            47: exit 0
        !            48: ?endverbatim

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.