OCC10118 InfoMsg loses the stream with tcl8.4 resource only

diff --git a/src/WOKsite/tclshrc_Wok b/src/WOKsite/tclshrc_Wok
index 5f1cfb3da6ad63934bf96ef811c884d3b16d1f06..ae95b07d023ab4c47246ef47a9a9fe27067ed584 100755 (executable)
--- 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.
 ;#