:
#	@(#) oafind 23.2 91/08/29 
#
#	Copyright (C) 1987-1991 The Santa Cruz Operation, Inc.
#		All Rights Reserved.
#	The information in this file is provided for the exclusive use of
#	the licensees of The Santa Cruz Operation, Inc.  Such users have the
#	right to use, modify, and incorporate this code into other products
#	for purposes authorized by the license agreement provided they include
#	this notice and the associated copyright notice with any such product.
#	The information in this file is provided "AS IS" without warranty.
#

OALIB=${OALIB-"/usr/lib/oa"}
PATH=$OALIB/utilbin:$PATH

 #  run ourself thru oash 
eval oainit 2>/dev/null || (oash $0; kill $$)
. `findfile shell_strs`

 #OAFIND1="Filename: "
 #OAFIND2="Locate File"
wmopen 1 3 50 7 12 
wmtitle "$OAFIND2"
echo "$OAFIND1"
wrefresh 1
read file
[ -z "$file" ] && { 
	oadeinit  # no file selected
	exit
}

TEMP=/tmp/fm1$$
find . -name "$file" -print > $TEMP 2>&1

 #OAFIND3='\\n    File ${file} not found.'
if test ! -s $TEMP; then
	eval echo $OAFIND3 >> $TEMP
fi

wmopen 2 13 50 9 12
wmmessage -r "$USEARROW" 
scan -e"$EOFMSG" $TEMP
rm -f $TEMP  
oadeinit
