#!/bin/sh
#
#  Helen Wong
#  July 7, 1991
#
#  Modified by: dyker Friday Mar 20 13:13:48 MST 1992
#       cleaned-up/took-out lots of superfluous stuff
#       fixed setting of folder
#       fixed the ed stuff - (some machines don't deal with /)
#       made it so it deals with only the first 25 lines
#       consolidated mhpath commands so it's only executed once
#       added recognition of last, first, and cur as valid msgs
#
#  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* | cur* | next* | prev*) 

		msg="$msg $1" ;;

	+* ) 
		folder="$1" ;;

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

done 

# set default folder
folder="${folder-+${FOLDER-`folder -fast`}}"


scan $folder $msg $form

#  End of pscan