mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-10 18:51:21 +03:00
0022874: Removing work-around in TObj_Model
This commit is contained in:
parent
975ec82af4
commit
d1ad9a8ddd
@ -85,21 +85,6 @@ void TObj_Model::CloseDocument (const Handle(TDocStd_Document)& theDoc)
|
|||||||
// Application
|
// Application
|
||||||
const Handle(TObj_Application) anApplication = GetApplication();
|
const Handle(TObj_Application) anApplication = GetApplication();
|
||||||
|
|
||||||
// cleanup CAF data
|
|
||||||
// PTV 21.11.2006:
|
|
||||||
//WARNING: It could be better to remove all attributes in OCAF document structure
|
|
||||||
// except TDocStd_Owner attribute.
|
|
||||||
// After all other is dead set to empty document to it and remove it from label
|
|
||||||
// ...
|
|
||||||
// But we still have previous implementation:
|
|
||||||
// - owner
|
|
||||||
Handle(TDocStd_Owner) owner;
|
|
||||||
if (theDoc->Main().Root().FindAttribute(TDocStd_Owner::GetID(), owner))
|
|
||||||
{
|
|
||||||
Handle_TDocStd_Document empty;
|
|
||||||
owner->SetDocument(empty);
|
|
||||||
}
|
|
||||||
|
|
||||||
// just all other attributes
|
// just all other attributes
|
||||||
theDoc->Main().Root().ForgetAllAttributes(Standard_True);
|
theDoc->Main().Root().ForgetAllAttributes(Standard_True);
|
||||||
anApplication->Close( theDoc );
|
anApplication->Close( theDoc );
|
||||||
|
Loading…
x
Reference in New Issue
Block a user