]> granicus.if.org Git - apache/commitdiff
find the first perl, not the last
authorJeff Trawick <trawick@apache.org>
Thu, 29 Aug 2002 23:04:36 +0000 (23:04 +0000)
committerJeff Trawick <trawick@apache.org>
Thu, 29 Aug 2002 23:04:36 +0000 (23:04 +0000)
we break-ed when we found the first perl, but it didn't
get us out of the outer for

git-svn-id: https://svn.apache.org/repos/asf/httpd/httpd/trunk@96580 13f79535-47bb-0310-9956-ffa450edef68

build/install-bindist.sh.in

index 314be2d4d5228c4a340512334802fa23b09dba37..58d3af68eae4d843411ddd82c2b1bd0d7fa17eae 100755 (executable)
@@ -50,16 +50,21 @@ lcopy()
 PERL=no-perl5-on-this-system
 perls='perl5 perl'
 path=`echo $PATH | sed -e 's/:/ /g'`
+found_perl=0
  
 for dir in ${path} ;  do
   for pperl in ${perls} ; do
     if test -f "${dir}/${pperl}" ; then
       if `${dir}/${pperl} -v >/dev/null 2>&1` ; then
         PERL="${dir}/${pperl}"
+        found_perl=1
         break
       fi
     fi
   done
+  if test $found_perl = 1 ; then
+    break
+  fi
 done
  
 if [ .$1 = . ]