https://bugs.freedesktop.org/show_bug.cgi?id=41128
Summary: Hyphenation doesn't honour properties in Basic
Product: LibreOffice
Version: LibO 3.4.3 release
Platform: x86-64 (AMD64)
OS/Version: Windows (All)
Status: NEW
Severity: normal
Priority: medium
Component: Libreoffice
AssignedTo: [email protected]
ReportedBy: [email protected]
Symptoms:
The attached code returns 'ra=dio'.
Expected behaviour:
The word 'radio' shouldn't be hyphenated.
Steps to reproduce:
Execute the attached code.
Thanks,
Stephan Hennig
Sub Main
Dim oHyphen As Object
Dim oLocale As New com.sun.star.lang.Locale
Dim emptyArgs(2) As New com.sun.star.beans.PropertyValue
emptyArgs(0).Name = "HyphMinLeading"
emptyArgs(0).Value = 4
emptyArgs(1).Name = "HyphMinTrailing"
emptyArgs(1).Value = 4
emptyArgs(2).Name = "HyphMinWordLength"
emptyArgs(2).Value = 9
Dim vReturn
Dim sWord, sHyphWord As String
Dim msg As String
oHyphen = createUnoService("com.sun.star.linguistic2.Hyphenator")
oLocale.Language = "en"
oLocale.Country = "US"
sWord = "radio"
vReturn = oHyphen.createPossibleHyphens(sWord, oLocale, emptyArgs())
If IsNull(vReturn) Then
sHyphWord = "Null"
Else
sHyphWord = vReturn.getPossibleHyphens()
End If
msg = "Hyphenating " & sWord & CHR$(10) & _
"Result: " & sHyphWord & CHR$(10)
MsgBox msg, 0, "Hyphenate Words"
End Sub
--
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