#!/bin/sh
#  Helen Wong
#  July 7, 1991
#
#  Modified by: dyker Fri Mar 20 13:13:48 MST 1992
#       cleaned-up/took-out lots of superfluous stuff
#       fixed setting of folder
#	fixed the selection of messages to use pick instead of grep
#       added recognition of last, first, next, prev, and cur as valid msgs
#	moved the -form value to a variable
#
#  Argument need to be saved since it will be shifted.  Argument might
#  be needed later.
#  declaration of variables 
#

PATH=/usr/local/mh/bin:/bin:/usr/bin
form="-form /homes/troubmh/Mail/pscan.form"

#  Arguments have to be either a folder name , a msg number, or 
#  nothing.

while [ "$#" -ne 0 ]
do
   case "$1" in 
	[0-9]* | [0-9]*[-][0-9]* |first*|last*|next*|prev*|cur* ) 

		msg="$msg $1" ;;

	+* ) 
		folder="$1" ;;

	* ) echo "Usage: $0 [+folder] [msg] " 
		   exit 1 ;; 
   esac 
   shift 

done 

folder="${folder-+${FOLDER-`folder -fast`}}"

hits=`pick $folder $msg --assigned-to $USER 2>/dev/null`
if [ "$hits" != "0" ]
then
	scan $folder $form $hits
else
	echo  "You're not there"
	exit 1
fi

#  End of myscan