H='
=========
exlp pattern file(s)
=========
calls vi for all files having pattern.
=========
BUGS	blanks or special characters generally do not work in
		pattern
=========
'
case $# in
	0)	exec $0 -h;exit 69;;
esac
case $1 in
	-x)		shift;set -x;;
    -h)   	clear;echo "$H";exit 0;;
esac
P="$1"
shift
F=`egrep -l "$P" $*`
case $F in
    "")     echo "($0) <no match> $P";exit 1;;
esac
vi "+/$P/" $F
