https://bugs.freedesktop.org/show_bug.cgi?id=43644

--- Comment #1 from Niklas Johansson <[email protected]> 2012-01-18 
09:34:05 PST ---
Reproducible on Win7 Swedish with LibreOffice Beta 3. 

It seems to fail when trying to create the service
com.sun.star.comp.office.BF_MigrateFilter 

I attach a screen-shot with the error message.

I haven't looked at the code for the code for the service and it is probably
there it should be fixed but a quick and dirty solution in BASIC is to create a
function:

Function createBF_MigrateFilterIfPossible()
Dim oService
    On Error GoTo RTError
    oService = createUnoService("com.sun.star.comp.office.BF_MigrateFilter")
    getBinFilterCompIfItExists = oService
    Exit Function
RTError:
    createBF_MigrateFilterIfPossible = Nothing
End Function


Then replace the line:
oBinFilterComp = createUnoService( "com.sun.star.comp.office.BF_MigrateFilter"
)

with:
oBinFilterComp = createBF_MigrateFilterIfPossible()

-- 
Configure bugmail: https://bugs.freedesktop.org/userprefs.cgi?tab=email
------- You are receiving this mail because: -------
You are the assignee for the bug.
_______________________________________________
Libreoffice-bugs mailing list
[email protected]
http://lists.freedesktop.org/mailman/listinfo/libreoffice-bugs

Reply via email to