summaryrefslogtreecommitdiff
path: root/wizards
diff options
context:
space:
mode:
Diffstat (limited to 'wizards')
-rw-r--r--wizards/source/formwizard/FormWizard.xba2
-rw-r--r--wizards/source/formwizard/tools.xba4
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