From e3b524d61b66983255456701d7fd9c39b46d9d3c Mon Sep 17 00:00:00 2001
From: cascade <cascade@opencascade.com>
Date: Thu, 6 Oct 2005 15:33:40 +0000
Subject: [PATCH] OCC10118 InfoMsg loses the stream with tcl8.4 resource only

---
 src/WOKsite/tclshrc_Wok | 3 ---
 1 file changed, 3 deletions(-)

diff --git a/src/WOKsite/tclshrc_Wok b/src/WOKsite/tclshrc_Wok
index 5f1cfb3..ae95b07 100755
--- a/src/WOKsite/tclshrc_Wok
+++ b/src/WOKsite/tclshrc_Wok
@@ -93,9 +93,6 @@ lappend auto_path $wok_library
 package require Wok
 package require Ms
 package require Tclx
-if { "$tcl_platform(os)" == "SunOS" } {
-   package require Expect
-}
 ;#
 ;# Where tcl and edl file of wok reside.
 ;#
-- 
2.39.5