diff options
Diffstat (limited to 'wizards')
-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 |