summaryrefslogtreecommitdiff
path: root/wizards/source/webwizard/HtmlAutoPilotBasic.xba
diff options
context:
space:
mode:
authorBehrend Cornelius <bc@openoffice.org>2002-11-08 12:55:35 +0000
committerBehrend Cornelius <bc@openoffice.org>2002-11-08 12:55:35 +0000
commitfefa3b69e6abd22a65c3ff4cf4db40050eb1d894 (patch)
tree6d7e7341a7ab9bdd9b3b1688d0823fc7de1507d9 /wizards/source/webwizard/HtmlAutoPilotBasic.xba
parentfe7f4ccfd003e1b42a1e41beb15f303354b62e39 (diff)
#104755# Now "DisposeDocument" called instead of "oBasedocument.dispose()"
Diffstat (limited to 'wizards/source/webwizard/HtmlAutoPilotBasic.xba')
-rw-r--r--wizards/source/webwizard/HtmlAutoPilotBasic.xba12
1 files changed, 4 insertions, 8 deletions
diff --git a/wizards/source/webwizard/HtmlAutoPilotBasic.xba b/wizards/source/webwizard/HtmlAutoPilotBasic.xba
index d7882bff25a3..9063117b9b16 100644
--- a/wizards/source/webwizard/HtmlAutoPilotBasic.xba
+++ b/wizards/source/webwizard/HtmlAutoPilotBasic.xba
@@ -61,15 +61,11 @@ On Local Error Goto GlobalErrorHandler
oBaseDocument.LockControllers
oViewSettings.ShowTableBoundaries = False
If Not GetWebWizardPaths() Then
- oBaseDocument.dispose()
+ DisposeDocument(oBaseDocument)
Exit Sub
End If
LoadLanguage
SetProgressValue(10)
- If Not GetWebWizardPaths() Then
- oBaseDocument.dispose()
- Exit Sub
- End If
Layout() = getListBoxArrays(oUcb, &quot;/cnt&quot;)
GetCurIndex(DialogModel, Layout(),2)
SetProgressValue(30)
@@ -88,7 +84,7 @@ On Local Error Goto GlobalErrorHandler
Select Case RetValue
Case 0
MainDialog.Dispose()
- oBaseDocument.Dispose()
+ DisposeDocument(oBaseDocument)
Case 1
EndDialog()
MainDialog.Dispose()
@@ -96,7 +92,7 @@ On Local Error Goto GlobalErrorHandler
GLOBALERRORHANDLER:
If Err &lt;&gt; 0 Then
MsgBox (WebWiz_gErrMsg$, 16, WebWiz_gWizardName$)
- oBaseDocument.dispose()
+ DisposeDocument(oBaseDocument)
RESUME EXITWIZARD
EXITWIZARD:
End If
@@ -369,7 +365,7 @@ Dim sExtension as String
End If
If Not bItemfound Then
MsgBox(WebWiz_gErrContentNotFound$, 16, WebWiz_gWizardName$)
- oBaseDocument.Dispose()
+ DisposeDocument(oBaseDocument)
Stop
End If
getListBoxArrays = List()