1985-04-14 23:26:24 +00:00
|
|
|
: ${CDIR=.}
|
|
|
|
if test ! -r .distr
|
|
|
|
then
|
|
|
|
echo ++ no .distr in $CDIR
|
|
|
|
exit 0
|
|
|
|
fi
|
|
|
|
${DS-:} $CDIR
|
|
|
|
for i in `cat .distr`
|
|
|
|
do
|
|
|
|
if test -d $i
|
|
|
|
then
|
|
|
|
( if cd $i
|
|
|
|
then
|
|
|
|
${DD-:} $CDIR $i
|
|
|
|
CDIR=$CDIR/$i
|
|
|
|
export CDIR
|
1987-04-16 13:57:54 +00:00
|
|
|
exec /proj/em/distr/dwalk
|
1985-04-14 23:26:24 +00:00
|
|
|
else
|
|
|
|
echo ++ Could not access $CDIR/$i
|
|
|
|
fi
|
|
|
|
)
|
|
|
|
else
|
|
|
|
${DF-:} $CDIR $i
|
|
|
|
fi
|
|
|
|
done
|