From: cas <cas@opencascade.com>
Date: Wed, 24 Nov 1999 18:03:07 +0000 (+0000)
Subject: No comments
X-Git-Url: http://git.dev.opencascade.org/gitweb/?a=commitdiff_plain;h=d732dc5fbf5ee7a4498b4f8b0f8a725713756251;p=occt-wok.git

No comments
---

diff --git a/src/WOKOrbix/WOKOrbix_ClientObjects.tcl b/src/WOKOrbix/WOKOrbix_ClientObjects.tcl
index d06e844..b6fad5f 100755
--- a/src/WOKOrbix/WOKOrbix_ClientObjects.tcl
+++ b/src/WOKOrbix/WOKOrbix_ClientObjects.tcl
@@ -22,8 +22,8 @@ proc WOKOrbix_ClientObjects:HandleInputFile { ID } {
 
 proc WOKOrbix_ClientObjects:Execute { unit args } {
 
-    msgprint -i -c "WOKOrbix_ClientObjects:Execute" "Processing client objects : $unit"
-    msgprint -i -c "WOKOrbix_ClientObjects:Execute"
+    msgprint -i -c "WOKOrbix_ClientObjects::Execute" "Processing client objects : $unit"
+    msgprint -i -c "WOKOrbix_ClientObjects::Execute"
 
     set unitname [wokinfo -n $unit]
  
diff --git a/src/WOKOrbix/WOKOrbix_ServerObjects.tcl b/src/WOKOrbix/WOKOrbix_ServerObjects.tcl
index dbcbc85..6bbacca 100755
--- a/src/WOKOrbix/WOKOrbix_ServerObjects.tcl
+++ b/src/WOKOrbix/WOKOrbix_ServerObjects.tcl
@@ -23,8 +23,8 @@ proc WOKOrbix_ServerObjects:HandleInputFile { ID } {
 
 proc WOKOrbix_ServerObjects:Execute { unit args } {
 
-    msgprint -i -c "WOKOrbix_ServerObjects:Execute" "Processing server objects : $unit"
-    msgprint -i -c "WOKOrbix_ServerObjects:Execute"
+    msgprint -i -c "WOKOrbix_ServerObjects::Execute" "Processing server objects : $unit"
+    msgprint -i -c "WOKOrbix_ServerObjects::Execute"
 
     set unitname [wokinfo -n $unit]