]> OCCT Git - occt-wok.git/commitdiff
No comments
authorcas <cas@opencascade.com>
Wed, 24 Nov 1999 18:03:07 +0000 (18:03 +0000)
committercas <cas@opencascade.com>
Wed, 24 Nov 1999 18:03:07 +0000 (18:03 +0000)
src/WOKOrbix/WOKOrbix_ClientObjects.tcl
src/WOKOrbix/WOKOrbix_ServerObjects.tcl

index d06e8442ece6c6dc81a6295c9df91f3e12c8eb92..b6fad5f449ac58e3e7d40761b6d875833ff46f9a 100755 (executable)
@@ -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]
  
index dbcbc85b779c92fafa17e3a6dfb1ade172732499..6bbaccada98a92fb5eae230bec894cc11d6b1830 100755 (executable)
@@ -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]