Bug OCC21929 Improvement of VC projects generation by WOK

diff --git a/src/WOKTclLib/osutils.tcl b/src/WOKTclLib/osutils.tcl
index e8cb79ef92bba58cc1c2c50305ae26b552d68ddd..23113ed84cfb00815a1aff700920c06951cd83b1 100755 (executable)
--- a/src/WOKTclLib/osutils.tcl
+++ b/src/WOKTclLib/osutils.tcl
@@ -936,11 +936,15 @@ proc osutils:vcproj { vc plat dir tkloc _guids {tmplat {} } {fmtcpp {} } } {
 }
 
 # Generate Visual Studio project file for executable
-proc osutils:vcprojx { vc plat dir tkloc _guids {tmplat {} } {fmtcpp {} } } {
-    if { $tmplat == {} } {set tmplat [osutils:vcproj:readtemplate $vc $plat 1]}
+proc osutils:vcprojx { vc plat dir tkloc _guids {tmplat0 {} } {fmtcpp {} } } {
     if { $fmtcpp == {} } {set fmtcpp [osutils:vcproj:fmtcppx]}
     set fout {}
     foreach f [osutils:tk:files $tkloc osutils:compilable 0] {
+       if { $tmplat0 == {} } {
+           set tmplat [osutils:vcproj:readtemplate $vc $plat 1]
+       } else {
+           set tmplat $tmplat0
+       }
         set tf [file rootname [file tail $f]]   
         set l_compilable [osutils:compilable]
         regsub -all -- {__XQTNAM__} $tmplat $tf tmplat