diff options
| author | Behrend Cornelius <bc@openoffice.org> | 2002-11-20 15:48:32 +0000 |
|---|---|---|
| committer | Behrend Cornelius <bc@openoffice.org> | 2002-11-20 15:48:32 +0000 |
| commit | f04cc6c05a7e2c0b350e34d3340fd08003b4a4ae (patch) | |
| tree | 962cb318ca840e80b219f67e26e49a48d22ea2e5 /wizards/source | |
| parent | cd8c3058dce2b2fafc3805d307f43d55d03e0931 (diff) | |
#104755# DisposeDocument inserted
Diffstat (limited to 'wizards/source')
| -rw-r--r-- | wizards/source/formwizard/FormWizard.xba | 2 | ||||
| -rw-r--r-- | wizards/source/formwizard/tools.xba | 4 |
2 files changed, 2 insertions, 4 deletions
diff --git a/wizards/source/formwizard/FormWizard.xba b/wizards/source/formwizard/FormWizard.xba index 2464769f9c2b..38ef1d381419 100644 --- a/wizards/source/formwizard/FormWizard.xba +++ b/wizards/source/formwizard/FormWizard.xba @@ -168,7 +168,7 @@ Dim SelList(0) as Integer oDBConnection.Dispose() End If If bDisposeDoc Then - oDocument.Dispose() + DisposeDocument(oDocument) ElseIf RetValue = 0 Then RemoveNirwanaShapes() End If diff --git a/wizards/source/formwizard/tools.xba b/wizards/source/formwizard/tools.xba index 63af3bff9393..fddd6e4560b3 100644 --- a/wizards/source/formwizard/tools.xba +++ b/wizards/source/formwizard/tools.xba @@ -319,9 +319,7 @@ Function GetFormWizardPaths() as Boolean End If End If End If - If Not IsNull(oDocument) Then - oDocument.dispose() - End If + DisposeDocument(oDocument) GetFormWizardPaths() = False End Function |