From b907cca37e53b90d0ee0ac7293eb2ed0f8b20fe0 Mon Sep 17 00:00:00 2001
From: kgv <kgv@opencascade.com>
Date: Thu, 15 Apr 2021 16:05:01 +0300
Subject: [PATCH] 0032304: Configuration - genproj should not override env.bat
 in OCC Products

---
 adm/genproj.tcl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/adm/genproj.tcl b/adm/genproj.tcl
index 68032c10db..f12905ff32 100644
--- a/adm/genproj.tcl
+++ b/adm/genproj.tcl
@@ -383,7 +383,7 @@ proc genprojbat {theFormat thePlatform theSolution} {
     set aTargetEol crlf
   }
 
-  if {"$theFormat" != "cmake"} {
+  if { [file exists "$::path/src/OS/FoundationClasses.tcl"] || ![file exists "$::path/env.${aTargetPlatformExt}"] } {
     # generate env.bat/sh
     set anEnvTmplFilePath "$::THE_CASROOT/adm/templates/env.${aTargetPlatformExt}"
     set anEnvTmplFile [open "$anEnvTmplFilePath" "r"]