From 701c0408d757ca669a046123123492a9a1573adb Mon Sep 17 00:00:00 2001
From: Barrie <barries@slaysys.com>
Date: Tue, 14 Mar 2017 21:01:50 -0400
Subject: [PATCH] Prevent a previoud set ErrorLevel=9009 from causing spurious
 "You do not have Perl in your PATH"

---
 win32/bin/pl2bat.pl | 1 +
 1 file changed, 1 insertion(+)

diff --git a/win32/bin/pl2bat.pl b/win32/bin/pl2bat.pl
index 443f5909e00b..4de3c883eb46 100644
--- a/win32/bin/pl2bat.pl
+++ b/win32/bin/pl2bat.pl
@@ -52,6 +52,7 @@
     $head = <<EOT;
 	\@rem = '--*-Perl-*--
 	\@echo off
+	set errorlevel=
 	if "%OS%" == "Windows_NT" goto WinNT
 	perl $OPT{'o'}
 	goto endofperl