From: gka <gka@opencascade.com>
Date: Mon, 3 Jul 2017 10:42:41 +0000 (+0300)
Subject: Commands.tcl for using checkprops in the tests
X-Git-Url: http://git.dev.opencascade.org/gitweb/?a=commitdiff_plain;h=82b83828dc967111819a95798fc941dd7c4de880;p=occt-copy.git

Commands.tcl for using checkprops in the tests
---

diff --git a/src/DrawResources/CheckCommands.tcl b/src/DrawResources/CheckCommands.tcl
index 668e59ef31..b198e18acb 100644
--- a/src/DrawResources/CheckCommands.tcl
+++ b/src/DrawResources/CheckCommands.tcl
@@ -359,8 +359,8 @@ proc checkfreebounds {shape ref_value args} {
 }
 
 help checkmaxtol {
-  Returns max tolerance of the shape and prints error message if specified
-  criteria are not satisfied.
+  Compare max tolerance of shape with reference value.
+  Command returns max tolerance of the shape.
 
   Use: checkmaxtol shape [options...]