:	"copyright (c) 1985	Empress Software Inc."

FROM="../../../_testtmp/testdb"
TO="[---._testtmp.testdb]"

cd c
for I in [a-z]*
do
	cd $I
	echo "$I:"
	ed - script.c <<@
g;$FROM;s;;$TO;
w
@
	cd ..
done

cd ../f77
for I in [a-z]*
do
	cd $I
	echo "$I:"
	ed - script.f <<@
g;$FROM;s;;$TO;
w
@
	mv script.f script.for
	ed - stdout <<@
g;^  ;s;;;
w
@
	cd ..
done
