Kaydet (Commit) af6ce167 authored tarafından Caolán McNamara's avatar Caolán McNamara

fix this up

üst 0ea3ef86
...@@ -120,6 +120,7 @@ Dim gDlgState as Integer ...@@ -120,6 +120,7 @@ Dim gDlgState as Integer
Sub SetGlobalDoc Sub SetGlobalDoc
gOutputDoc = ThisComponent gOutputDoc = ThisComponent
oBinFilterComp = createUnoService( "com.sun.star.comp.office.BF_MigrateFilter" )
end Sub end Sub
Sub ClearStatus Sub ClearStatus
...@@ -147,8 +148,6 @@ Sub Main ...@@ -147,8 +148,6 @@ Sub Main
gCurrentDocTest = frmTestClosure gCurrentDocTest = frmTestClosure
gCurrentTestCase = cLogfileFailed gCurrentTestCase = cLogfileFailed
oBinFilterComp = createUnoService( "com.sun.star.comp.office.BF_MigrateFilter" )
DeleteAllSavedFiles() DeleteAllSavedFiles()
DeleteAllLogFiles() DeleteAllLogFiles()
SetupWorkPath() SetupWorkPath()
...@@ -536,7 +535,7 @@ Sub SetGlobalOptionsDialog () ...@@ -536,7 +535,7 @@ Sub SetGlobalOptionsDialog ()
REM create dialog control REM create dialog control
gOptionsDialog = CreateUnoDialog( oInputStreamProvider ) gOptionsDialog = CreateUnoDialog( oInputStreamProvider )
if not isNull(oBinFilterComp) then if isNull(oBinFilterComp) then
oControl = gOptionsDialog.getControl("cbOpen50Test") oControl = gOptionsDialog.getControl("cbOpen50Test")
oControl.Model.setPropertyValue("Enabled", FALSE) oControl.Model.setPropertyValue("Enabled", FALSE)
end If end If
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment