From af5f5dc72195eeff5a23e0f50933a2705469cd24 Mon Sep 17 00:00:00 2001
From: bugmaster <bugmaster@opencascade.com>
Date: Thu, 19 Apr 2012 18:06:04 +0400
Subject: [PATCH] Update of service files for WOK

---
 src/OS/FoundationClasses.tcl | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/src/OS/FoundationClasses.tcl b/src/OS/FoundationClasses.tcl
index 7d30910fe8..c418a4d4e0 100755
--- a/src/OS/FoundationClasses.tcl
+++ b/src/OS/FoundationClasses.tcl
@@ -25,7 +25,7 @@ proc FoundationClasses:toolkits { } {
 ;# Autres UDs a prendre.
 ;#
 proc FoundationClasses:ressources { } {
-        return [list [list both r UnitsAPI {} ] [list both r OS {} ]] \
+        return [list [list both r OS {} ]] \
 }
 ;
 ;#
@@ -112,3 +112,7 @@ proc FoundationClasses:LinksoWith { } {
 proc FoundationClasses:Export { } {
     return [list source runtime wokadm api]
 }
+
+proc FoundationClasses:install { } {
+        return [list UnitsAPI]
+}