This is my patch patch.0a for perl5.000.
[p5sagit/p5-mst-13.2.git] / doSH
1 :  doSH is obsolete.  Just use Configure -S
2 :  
3 if test -f Configure ; then TOP=.;
4 elif test -f ../Configure ; then TOP=..;
5 elif test -f ../../Configure ; then TOP=../..;
6 elif test -f ../../../Configure ; then TOP=../../..;
7 elif test -f ../../../../Configure ; then TOP=../../../..;
8 else
9         echo "Can't find Configure" ; exit 1
10 fi
11
12 sh $TOP/Configure -S