From e0350fbd7265835d18abe0472fc202cd31e89a2e Mon Sep 17 00:00:00 2001
From: Pat Thoyts <patthoyts@users.sourceforge.net>
Date: Fri, 30 Mar 2007 21:41:56 +0000
Subject: [PATCH] Create the 8.x directory if it is not present.

git-svn-id: svn://svn.equi4.com/kitgen/trunk@1338 9e558909-932a-0410-a563-af77432da1eb
---
 kbs.tcl | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/kbs.tcl b/kbs.tcl
index fa9bd4c..291d0b6 100644
--- a/kbs.tcl
+++ b/kbs.tcl
@@ -120,6 +120,9 @@ namespace eval config {
     }
     
     proc Srcdir {} {
+        if {![file isdirectory [Topdir]/8.x]} {
+            file mkdir [Topdir]/8.x
+        }
         return [Topdir]/8.x/$v::package-$v::version
     }
     
-- 
2.23.0