litvinovg/cleanandvalidate
1
0
Fork 0
Code Issues 4 Pull requests Projects Releases 50 Packages Wiki Activity Actions

Search for formatting in text with styles

Browse source
This commit is contained in:
Georgy Litvinov 2020-06-25 11:50:45 +02:00
parent 6c8186d552
commit f4b6801a94
3 changed files with 4 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

4
Redaction/Clean.xba
View file

@ -1,6 +1,6 @@
<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE script:module PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "module.dtd">
<script:module xmlns:script="http://openoffice.org/2000/script" script:name="Clean" script:language="StarBasic">Sub mark55
<script:module xmlns:script="http://openoffice.org/2000/script" script:name="Clean" script:language="StarBasic">Sub mark56
End Sub
@ -1382,7 +1382,7 @@ Private Sub convertFormatToUserFields(identifier As String, styleNames, styleVal
SDesc.SearchAll = true
SDesc.SearchRegularExpression = true
SDesc.SearchString = &quot;&quot;
SDesc.searchStyles = false
SDesc.searchStyles = true
SDesc.SetSearchAttributes(SrchAttributes)
found = Thiscomponent.findFirst(SDesc)
i = 0