From: ibs <ibs@opencascade.com>
Date: Tue, 20 Nov 2012 08:16:15 +0000 (+0400)
Subject: wgenproj creates the required "inc" folder in the [pwd]
X-Git-Tag: V6_7_1~90
X-Git-Url: http://git.dev.opencascade.org/gitweb/?a=commitdiff_plain;h=a982202a3a416f5d2006ce851387b6b6e059d5c7;p=occt-wok.git

wgenproj creates the required "inc" folder in the [pwd]
---

diff --git a/src/WOKsite/wok_tclshrc.tcl b/src/WOKsite/wok_tclshrc.tcl
index 542a90a..0deec6d 100644
--- a/src/WOKsite/wok_tclshrc.tcl
+++ b/src/WOKsite/wok_tclshrc.tcl
@@ -321,6 +321,11 @@ proc wgenproj { args } {
     set aProcArgs [lreplace $aProcArgs $anIndex $anIndex]
   }
 
+  # create the inc directory. The directory should be created by wprocess function.
+  wokcd -P Home
+  file mkdir [file join [pwd] inc]
+  #
+  
   if { "$aProcArgs" != "" } {
     wprocess $aProcArgs -DGroups=Src,Xcpp
   } else {