https://bugs.documentfoundation.org/show_bug.cgi?id=128650

            Bug ID: 128650
           Summary: Calling setToDefault doesn't work in Impress
           Product: LibreOffice
           Version: 6.2.5.2 release
          Hardware: All
                OS: All
            Status: UNCONFIRMED
          Severity: normal
          Priority: medium
         Component: Impress
          Assignee: [email protected]
          Reporter: [email protected]

Description:
Calling setToDefault of XPropertyState interface on a text range in Impress
doesn't work.

Steps to Reproduce:
1. Open the attached document.
2. Insert Basic code and run it.
Sub ResetCharFontToDefaultImpress

  Dim oDrawPages As Variant
  Dim oObj1 As Variant
  Dim oObj2 As Variant
  Dim oText As Variant
  Dim oStart As Variant
  Dim oObj3 As Variant

  oDrawPages = ThisComponent.getDrawPages()
  oObj1 = oDrawPages.getByIndex(0)
  oObj2 = oObj1.getByIndex(0)

  oText = oObj2.getText()
  oStart = oText.getStart()
  oObj3 = oText.createTextCursorByRange(oStart)

  oObj3.goRight(5, True)
  msgbox  oObj3.getString()

  oObj3.setPropertyToDefault("CharFontName")   

End Sub


Actual Results:
First five characters "aaaaa" show up in the message, the text is formatted
with Times New Roman. 

Expected Results:
First five characters "aaaaa" should show up in the message, the font of the
text should be set to its default ( Liberation Sans ).


Reproducible: Always


User Profile Reset: No



Additional Info:

-- 
You are receiving this mail because:
You are the assignee for the bug.
_______________________________________________
Libreoffice-bugs mailing list
[email protected]
https://lists.freedesktop.org/mailman/listinfo/libreoffice-bugs

Reply via email to