From f11b9af46422d851e027c75c2a3e57a65c1d6390 Mon Sep 17 00:00:00 2001
From: vro <vro@opencascade.com>
Date: Wed, 28 Mar 2012 12:33:22 +0400
Subject: [PATCH] 0023038: QA command OCC361 gives an exception

---
 src/QABugs/QABugs_1.cxx | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/src/QABugs/QABugs_1.cxx b/src/QABugs/QABugs_1.cxx
index 586f977d54..3f5101ef56 100644
--- a/src/QABugs/QABugs_1.cxx
+++ b/src/QABugs/QABugs_1.cxx
@@ -502,9 +502,11 @@ static Standard_Integer OCC361bug (Draw_Interpretor& di, Standard_Integer nb, co
   TopoDS_Shape aTBox1 = aTBox;
   aTBox1.Orientation(TopAbs_REVERSED);
   aTestLabel.ForgetAllAttributes();
-  aBuilder.Generated( aTBox1);
 
-  aTBox = aBuilder.NamedShape()->Get();
+  TNaming_Builder aBuilder2(aTestLabel);
+  aBuilder2.Generated( aTBox1);
+
+  aTBox = aBuilder2.NamedShape()->Get();
   if(aTBox.Orientation() != TopAbs_REVERSED) {
     di << "1" << "\n";
   } else {