0030675: Visualization - remove redundant proxy classes in hierarchy of PrsMgr_Presen...
[occt.git] / src / XmlMDF / XmlMDF_ReferenceDriver.cxx
old mode 100755 (executable)
new mode 100644 (file)
index 8cefac5..e104206
@@ -1,21 +1,37 @@
-// File:      XmlMDF_ReferenceDriver.cxx
-// Created:   04.09.01 14:47:31
-// Author:    Julia DOROVSKIKH
-// Copyright: Open Cascade 2001
-// History:   AGV 150202: Changed prototype XmlObjMgt::SetStringValue()
+// Created on: 2001-09-04
+// Created by: Julia DOROVSKIKH
+// Copyright (c) 2001-2014 OPEN CASCADE SAS
+//
+// This file is part of Open CASCADE Technology software library.
+//
+// This library is free software; you can redistribute it and/or modify it under
+// the terms of the GNU Lesser General Public License version 2.1 as published
+// by the Free Software Foundation, with special exception defined in the file
+// OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
+// distribution for complete text of the license and disclaimer of any warranty.
+//
+// Alternatively, this file may be used under the terms of Open CASCADE
+// commercial license or contractual agreement.
 
-#include <XmlMDF_ReferenceDriver.ixx>
-#include <XmlObjMgt.hxx>
+//AGV 150202: Changed prototype XmlObjMgt::SetStringValue()
 
+#include <Message_Messenger.hxx>
+#include <Standard_Type.hxx>
+#include <TDF_Attribute.hxx>
 #include <TDF_Reference.hxx>
 #include <TDF_Tool.hxx>
+#include <XmlMDF_ReferenceDriver.hxx>
+#include <XmlObjMgt.hxx>
+#include <XmlObjMgt_Persistent.hxx>
+
+IMPLEMENT_STANDARD_RTTIEXT(XmlMDF_ReferenceDriver,XmlMDF_ADriver)
 
 //=======================================================================
 //function : XmlMDF_ReferenceDriver
 //purpose  : Constructor
 //=======================================================================
 XmlMDF_ReferenceDriver::XmlMDF_ReferenceDriver
-                        (const Handle(CDM_MessageDriver)& theMsgDriver)
+                        (const Handle(Message_Messenger)& theMsgDriver)
       : XmlMDF_ADriver (theMsgDriver, NULL)
 {}
 
@@ -41,7 +57,7 @@ Standard_Boolean XmlMDF_ReferenceDriver::Paste
 
   if (anXPath == NULL)
   {
-    WriteMessage ("Cannot retrieve reference string from element");
+    myMessageDriver->Send ("Cannot retrieve reference string from element", Message_Fail);
     return Standard_False;
   }
 
@@ -51,7 +67,7 @@ Standard_Boolean XmlMDF_ReferenceDriver::Paste
     TCollection_ExtendedString aMessage =
       TCollection_ExtendedString ("Cannot retrieve reference from \"")
         + anXPath + '\"';
-    WriteMessage (aMessage);
+    myMessageDriver->Send (aMessage, Message_Fail);
     return Standard_False;
   }