Commit 0ad6c722 authored by Steve Holme's avatar Steve Holme
Browse files

checksrc.bat: Fixed cannot find perl if installed but not in path

parent 05401b9a

projects/checksrc.bat

+11 −4
Original line number Diff line number Diff line
@@ -6,7 +6,7 @@ rem * / __| | | | |_) | | 
rem *                            | (__| |_| |  _ <| |___

rem *                             \___|\___/|_| \_\_____|

rem *

rem * Copyright (C) 2014 - 2015, Steve Holme, <steve_holme@hotmail.com>.

rem * Copyright (C) 2014 - 2016, Steve Holme, <steve_holme@hotmail.com>.

rem *

rem * This software is licensed as described in the file COPYING, which

rem * you should have received as part of this distribution. The terms
@@ -48,11 +48,18 @@ rem *************************************************************************** 
  shift & goto parseArgs



:prerequisites

  rem Check we have Perl installed

  rem Check we have Perl in our path

  echo %PATH% | findstr /I /C:"\Perl" 1>nul

  if errorlevel 1 (

    if not exist "%SystemDrive%\Perl" (

      if not exist "%SystemDrive%\Perl64" goto noperl

    rem It isn't so check we have it installed and set the path if it is

    if exist "%SystemDrive%\Perl" (

      set "PATH=%PATH%;%SystemDrive%\Perl\bin"

    ) else (

      if exist "%SystemDrive%\Perl64" (

        set "PATH=%SystemDrive%\Perl64\bin;%PATH%"

      ) else (

        goto noperl

      )

    )

  )