Compare commits

..

No commits in common. "master" and "0.7.19" have entirely different histories.

46 changed files with 306 additions and 5955 deletions

View file

@ -87,25 +87,6 @@
<value>_self</value> <value>_self</value>
</prop> </prop>
</node> </node>
<node oor:name="fontReport" oor:op="replace">
<prop oor:name="Context" oor:type="xs:string">
<value>com.sun.star.drawing.DrawingDocument</value>
</prop>
<prop oor:name="Title" oor:type="xs:string">
<value xml:lang="ru">Отчёт о символах в шрифте</value>
<value xml:lang="sr">Извештај о знаковима фонта</value>
<value xml:lang="hr">Izvještaj o znakovima fonta</value>
<value xml:lang="bs">Izvještaj o znakovima fonta</value>
<value xml:lang="en">Font character report</value>
</prop>
<prop oor:name="URL" oor:type="xs:string">
<value>macro:///Redaction.Validation.fontReportButton</value>
</prop>
<prop oor:name="Target" oor:type="xs:string">
<value>_self</value>
</prop>
</node>
</node> </node>
</node> </node>
<node oor:name="Images"> <node oor:name="Images">
@ -115,7 +96,7 @@
</prop> </prop>
<node oor:name="UserDefinedImages"> <node oor:name="UserDefinedImages">
<prop oor:name="ImageBigURL"> <prop oor:name="ImageBigURL">
<value>%origin%/icons/clean.svg</value> <value>%origin%/icons/clean.png</value>
</prop> </prop>
</node> </node>
</node> </node>
@ -125,21 +106,10 @@
</prop> </prop>
<node oor:name="UserDefinedImages"> <node oor:name="UserDefinedImages">
<prop oor:name="ImageBigURL"> <prop oor:name="ImageBigURL">
<value>%origin%/icons/validate.svg</value> <value>%origin%/icons/validate.png</value>
</prop> </prop>
</node> </node>
</node> </node>
<node oor:name="image-report-button" oor:op="replace">
<prop oor:name="URL" oor:type="xs:string">
<value>macro:///Redaction.Validation.fontReportButton</value>
</prop>
<node oor:name="UserDefinedImages">
<prop oor:name="ImageBigURL">
<value>%origin%/icons/report.svg</value>
</prop>
</node>
</node>
</node> </node>
</node> </node>
</oor:component-data> </oor:component-data>

View file

@ -2,6 +2,5 @@
<manifest:manifest> <manifest:manifest>
<manifest:file-entry manifest:full-path="Redaction/" manifest:media-type="application/vnd.sun.star.basic-library"/> <manifest:file-entry manifest:full-path="Redaction/" manifest:media-type="application/vnd.sun.star.basic-library"/>
<manifest:file-entry manifest:full-path="Addons.xcu" manifest:media-type="application/vnd.sun.star.configuration-data"/> <manifest:file-entry manifest:full-path="Addons.xcu" manifest:media-type="application/vnd.sun.star.configuration-data"/>
<manifest:file-entry manifest:full-path="Templates.xcu" manifest:media-type="application/vnd.sun.star.configuration-data"/>
<manifest:file-entry manifest:full-path="WriterWindowState.xcu" manifest:media-type="application/vnd.sun.star.configuration-data"/> <manifest:file-entry manifest:full-path="WriterWindowState.xcu" manifest:media-type="application/vnd.sun.star.configuration-data"/>
</manifest:manifest> </manifest:manifest>

View file

@ -1,10 +0,0 @@
<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE dlg:window PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "dialog.dtd">
<dlg:window xmlns:dlg="http://openoffice.org/2000/dialog" xmlns:script="http://openoffice.org/2000/script" dlg:id="ChooseFontname" dlg:left="154" dlg:top="60" dlg:width="229" dlg:height="190" dlg:closeable="true" dlg:moveable="true">
<dlg:bulletinboard>
<dlg:menulist dlg:id="fontList" dlg:tab-index="0" dlg:left="2" dlg:top="32" dlg:width="225" dlg:height="156">
<script:event script:event-name="on-performaction" script:macro-name="vnd.sun.star.script:Redaction.Validation.onSelectFont?language=Basic&amp;location=application" script:language="Script"/>
</dlg:menulist>
<dlg:text dlg:id="description" dlg:tab-index="1" dlg:left="2" dlg:top="4" dlg:width="225" dlg:height="24" dlg:value="dialog description"/>
</dlg:bulletinboard>
</dlg:window>

View file

@ -1,11 +1,9 @@
<?xml version="1.0" encoding="UTF-8"?> <?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE script:module PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "module.dtd"> <!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 mark96 <script:module xmlns:script="http://openoffice.org/2000/script" script:name="Clean" script:language="StarBasic">Sub mark60
End Sub End Sub
Dim DocumentLoaded as Boolean
Sub cleanButton Sub cleanButton
Dim config As Object Dim config As Object
config = initRedactionConfiguration() config = initRedactionConfiguration()
@ -13,9 +11,6 @@ Sub cleanButton
MsgBox(getTranslation(&quot;documentIsReadOnly&quot;)) MsgBox(getTranslation(&quot;documentIsReadOnly&quot;))
Exit Sub Exit Sub
EndIf EndIf
If config.getPropertyValue(&quot;predefined_template&quot;) = &quot;false&quot; Then
configureStyleFileDialog()
EndIf
If config.getPropertyValue(&quot;complexity&quot;) = &quot;user&quot; then If config.getPropertyValue(&quot;complexity&quot;) = &quot;user&quot; then
quietStartDialog() quietStartDialog()
Else Else
@ -23,56 +18,45 @@ Sub cleanButton
EndIf EndIf
End Sub End Sub
Dim advancedCleaningDialog As Object
Private Sub makerUpMenu Private Sub makerUpMenu
Dim dialog As Object
DialogLibraries.LoadLibrary(&quot;Redaction&quot;) DialogLibraries.LoadLibrary(&quot;Redaction&quot;)
advancedCleaningDialog = CreateUnoDialog(DialogLibraries.Redaction.CleaningDialog) dialog = CreateUnoDialog(DialogLibraries.Redaction.CleaningDialog)
advancedCleaningDialog.getControl(&quot;fontsInStyles&quot;).Label = getTranslation(&quot;advancedMenuReplaceFontsInStyles&quot;)
advancedCleaningDialog.getControl(&quot;symbolsConversion&quot;).Label = getTranslation(&quot;advancedMenuSymbolsConversion&quot;) dialog.getControl(&quot;fontsInStyles&quot;).Label = getTranslation(&quot;advancedMenuReplaceFontsInStyles&quot;)
advancedCleaningDialog.getControl(&quot;cleanFormatting&quot;).Label = getTranslation(&quot;advancedMenuCleanFormatting&quot;) dialog.getControl(&quot;symbolsConversion&quot;).Label = getTranslation(&quot;advancedMenuSymbolsConversion&quot;)
advancedCleaningDialog.getControl(&quot;replaceWhiteBackground&quot;).Label = getTranslation(&quot;advancedMenuReplaceWhiteBackground&quot;) dialog.getControl(&quot;cleanFormatting&quot;).Label = getTranslation(&quot;advancedMenuCleanFormatting&quot;)
advancedCleaningDialog.getControl(&quot;removeUnusedStyles&quot;).Label = getTranslation(&quot;advancedMenuRemoveUnusedStyles&quot;) dialog.getControl(&quot;replaceWhiteBackground&quot;).Label = getTranslation(&quot;advancedMenuReplaceWhiteBackground&quot;)
advancedCleaningDialog.getControl(&quot;removeLinks&quot;).Label = getTranslation(&quot;advancedMenuRemoveLinks&quot;) dialog.getControl(&quot;removeUnusedStyles&quot;).Label = getTranslation(&quot;advancedMenuRemoveUnusedStyles&quot;)
advancedCleaningDialog.getControl(&quot;removeAllFields&quot;).Label = getTranslation(&quot;advancedMenuRemoveAllFields&quot;) dialog.getControl(&quot;removeLinks&quot;).Label = getTranslation(&quot;advancedMenuRemoveLinks&quot;)
advancedCleaningDialog.getControl(&quot;removeBookmarks&quot;).Label = getTranslation(&quot;advancedMenuRemoveBookmarks&quot;) dialog.getControl(&quot;removeBookmarks&quot;).Label = getTranslation(&quot;advancedMenuRemoveBookmarks&quot;)
advancedCleaningDialog.getControl(&quot;configTables&quot;).Label = getTranslation(&quot;advancedMenuConfigTables&quot;) dialog.getControl(&quot;configTables&quot;).Label = getTranslation(&quot;advancedMenuConfigTables&quot;)
advancedCleaningDialog.getControl(&quot;configAnchors&quot;).Label = getTranslation(&quot;advancedMenuConfigAnchors&quot;) dialog.getControl(&quot;configAnchors&quot;).Label = getTranslation(&quot;advancedMenuConfigAnchors&quot;)
advancedCleaningDialog.getControl(&quot;fixMistakes&quot;).Label = getTranslation(&quot;advancedMenuFixMistakes&quot;) dialog.getControl(&quot;fixMistakes&quot;).Label = getTranslation(&quot;advancedMenuFixMistakes&quot;)
advancedCleaningDialog.getControl(&quot;fixDOI&quot;).Label = getTranslation(&quot;advancedMenuFixDOI&quot;) dialog.getControl(&quot;removeInitPageBreak&quot;).Label = getTranslation(&quot;advancedMenuRemoveInitPageBreak&quot;)
advancedCleaningDialog.getControl(&quot;replaceNumHyphen&quot;).Label = getTranslation(&quot;replaceNumHyphen&quot;) dialog.getControl(&quot;removePageStyles&quot;).Label = getTranslation(&quot;advancedMenuRemovePageStyles&quot;)
advancedCleaningDialog.getControl(&quot;removeInitPageBreak&quot;).Label = getTranslation(&quot;advancedMenuRemoveInitPageBreak&quot;) dialog.getControl(&quot;loadStandardStyles&quot;).Label = getTranslation(&quot;advancedMenuLoadStandardStyles&quot;)
advancedCleaningDialog.getControl(&quot;removePageStyles&quot;).Label = getTranslation(&quot;advancedMenuRemovePageStyles&quot;) dialog.getControl(&quot;removeManualPageBreaks&quot;).Label = getTranslation(&quot;advancedMenuRemoveManualPageBreaks&quot;)
advancedCleaningDialog.getControl(&quot;loadStandardStyles&quot;).Label = getTranslation(&quot;advancedMenuLoadStandardStyles&quot;) dialog.getControl(&quot;removeBasic&quot;).Label = getTranslation(&quot;advancedMenuRemoveBasic&quot;)
advancedCleaningDialog.getControl(&quot;removeManualPageBreaks&quot;).Label = getTranslation(&quot;advancedMenuRemoveManualPageBreaks&quot;) dialog.getControl(&quot;Cancel&quot;).Label = getTranslation(&quot;buttonCancel&quot;)
advancedCleaningDialog.getControl(&quot;removeBasic&quot;).Label = getTranslation(&quot;advancedMenuRemoveBasic&quot;) dialog.getControl(&quot;OK&quot;).Label = getTranslation(&quot;buttonOK&quot;)
advancedCleaningDialog.getControl(&quot;resetChapterNumberingRules&quot;).Label = getTranslation(&quot;advancedMenuResetChapterNumberingRules&quot;) dialog.getControl(&quot;buttonLoad&quot;).Label = getTranslation(&quot;buttonLoad&quot;)
advancedCleaningDialog.getControl(&quot;convertFontsToCharStyles&quot;).Label = getTranslation(&quot;advancedMenuconvertFontsToCharStyles&quot;) dialog.Title = getTranslation(&quot;advancedMenuDialogTitle&quot;)
advancedCleaningDialog.getControl(&quot;fixBrokenCharBackTransparent&quot;).Label = getTranslation(&quot;fixBrokenCharBackTransparentMenuItem&quot;) dialog.setVisible(true)
advancedCleaningDialog.getControl(&quot;removeNotTransparentBackgrounds&quot;).Label = getTranslation(&quot;removeNotTransparentBackgrounds&quot;) Select Case dialog.Execute()
advancedCleaningDialog.getControl(&quot;fixDiacriticKerning&quot;).Label = getTranslation(&quot;fixDiacriticKerning&quot;)
advancedCleaningDialog.getControl(&quot;Cancel&quot;).Label = getTranslation(&quot;buttonCancel&quot;)
advancedCleaningDialog.getControl(&quot;OK&quot;).Label = getTranslation(&quot;buttonOK&quot;)
advancedCleaningDialog.getControl(&quot;buttonLoad&quot;).Label = getTranslation(&quot;buttonLoad&quot;)
advancedCleaningDialog.Title = getTranslation(&quot;advancedMenuDialogTitle&quot;)
setAdvancedDialogDescription()
advancedCleaningDialog.setVisible(true)
Select Case advancedCleaningDialog.Execute()
Case 1 Case 1
cleanAccordingTo(advancedCleaningDialog) cleanAccordingTo(dialog)
Case 0 Case 0
End Select End Select
advancedCleaningDialog.dispose() dialog.dispose()
Exit sub Exit sub
End Sub End Sub
Private Sub cleanAccordingTo(dialog As Object) Private Sub cleanAccordingTo(dialog As Object)
Dim statusIndicator as Object Dim statusIndicator as Object
Dim openTrackChanges As Boolean statusIndicator = ThisComponent.getCurrentController.statusIndicator
openTrackChanges = false
dialog.setVisible(false) dialog.setVisible(false)
saveDocument saveDocument
statusIndicator = ThisComponent.getCurrentController.statusIndicator
statusIndicator.Start(getTranslation(&quot;statusStarted&quot;),100) statusIndicator.Start(getTranslation(&quot;statusStarted&quot;),100)
doNotTrack doNotTrack
If dialog.getControl(&quot;loadStandardStyles&quot;).state = 1 Then If dialog.getControl(&quot;loadStandardStyles&quot;).state = 1 Then
@ -103,10 +87,6 @@ Private Sub cleanAccordingTo(dialog As Object)
statusIndicator.Start(getTranslation(&quot;statusRemoveLinks&quot;),100) statusIndicator.Start(getTranslation(&quot;statusRemoveLinks&quot;),100)
removeHyperlinks removeHyperlinks
EndIf EndIf
If dialog.getControl(&quot;removeAllFields&quot;).state = 1 Then
statusIndicator.Start(getTranslation(&quot;statusRemoveAllFields&quot;),100)
removeAllFields
EndIf
If dialog.getControl(&quot;removeBookmarks&quot;).state = 1 Then If dialog.getControl(&quot;removeBookmarks&quot;).state = 1 Then
statusIndicator.Start(getTranslation(&quot;statusRemoveBookmarks&quot;),100) statusIndicator.Start(getTranslation(&quot;statusRemoveBookmarks&quot;),100)
disposeAllBookmarks disposeAllBookmarks
@ -120,21 +100,9 @@ Private Sub cleanAccordingTo(dialog As Object)
fixDrawingAnchors fixDrawingAnchors
EndIf EndIf
If dialog.getControl(&quot;fixMistakes&quot;).state = 1 Then If dialog.getControl(&quot;fixMistakes&quot;).state = 1 Then
saveAndreload()
statusIndicator = ThisComponent.getCurrentController.statusIndicator
statusIndicator.Start(getTranslation(&quot;statusFixFrequentMistakes&quot;),100) statusIndicator.Start(getTranslation(&quot;statusFixFrequentMistakes&quot;),100)
fixFrequentMistakes fixFrequentMistakes
EndIf EndIf
If dialog.getControl(&quot;fixDOI&quot;).state = 1 Then
statusIndicator.Start(getTranslation(&quot;statusFixingDOI&quot;),100)
openTrackChanges = true
fixDOI
EndIf
If dialog.getControl(&quot;replaceNumHyphen&quot;).state = 1 Then
statusIndicator.Start(getTranslation(&quot;replaceNumHyphenStatus&quot;),100)
openTrackChanges = true
replaceNumHyphen
EndIf
If dialog.getControl(&quot;removeInitPageBreak&quot;).state = 1 Then If dialog.getControl(&quot;removeInitPageBreak&quot;).state = 1 Then
statusIndicator.Start(getTranslation(&quot;statusRemovePageBreakAtStart&quot;),100) statusIndicator.Start(getTranslation(&quot;statusRemovePageBreakAtStart&quot;),100)
removeFirstElementPageBreak removeFirstElementPageBreak
@ -153,28 +121,10 @@ Private Sub cleanAccordingTo(dialog As Object)
If dialog.getControl(&quot;removeBasic&quot;).state = 1 Then If dialog.getControl(&quot;removeBasic&quot;).state = 1 Then
removeLibs removeLibs
EndIf EndIf
If dialog.getControl(&quot;resetChapterNumberingRules&quot;).state = 1 Then
resetChapterNumberingRules
EndIf
If dialog.getControl(&quot;convertFontsToCharStyles&quot;).state = 1 Then
convertFontsToCharStyles()
EndIf
If dialog.getControl(&quot;fixBrokenCharBackTransparent&quot;).state = 1 Then
fixBrokenCharBackTransparent()
EndIf
If dialog.getControl(&quot;removeNotTransparentBackgrounds&quot;).state = 1 Then
fixColoredBackgroundInDoc()
EndIf
If dialog.getControl(&quot;fixDiacriticKerning&quot;).state = 1 Then
fixDiacriticKerning()
EndIf
statusIndicator.end() statusIndicator.end()
saveAndreload() saveAndreload()
MsgBox getTranslation(&quot;cleaningFinished&quot;) MsgBox getTranslation(&quot;cleaningFinished&quot;)
If openTrackChanges Then
showTrackedChanges
Endif
End Sub End Sub
@ -194,20 +144,15 @@ End Sub
Private Sub quietCleaning Private Sub quietCleaning
Dim description As String Dim description As String
Dim statusIndicator As Object Dim statusIndicator As Object
DocumentLoaded = false statusIndicator = ThisComponent.getCurrentController.statusIndicator
saveDocument saveDocument
saveAsDocAndBackToODT saveAsDocAndBackToODT
statusIndicator = ThisComponent.getCurrentController.statusIndicator
statusIndicator.Start(getTranslation(&quot;statusStarted&quot;),100) statusIndicator.Start(getTranslation(&quot;statusStarted&quot;),100)
doNotTrack doNotTrack
statusIndicator.Start(getTranslation(&quot;statusReplaceFontsInStyles&quot;),100) statusIndicator.Start(getTranslation(&quot;statusReplaceFontsInStyles&quot;),100)
replaceStyleFonts replaceStyleFonts
statusIndicator.Start(getTranslation(&quot;statusConvertSymbolsInTargetFonts&quot;),100) statusIndicator.Start(getTranslation(&quot;statusConvertSymbolsInTargetFonts&quot;),100)
saveAndreload()
statusIndicator = ThisComponent.getCurrentController.statusIndicator
unicodeSymbolsConversion unicodeSymbolsConversion
statusIndicator.Start(getTranslation(&quot;statusFixingDiacriticCharactersKerning&quot;),100)
fixDiacriticKerning
statusIndicator.Start(getTranslation(&quot;statusCleaningManualFormatting&quot;),100) statusIndicator.Start(getTranslation(&quot;statusCleaningManualFormatting&quot;),100)
cleanFormatting cleanFormatting
statusIndicator.Start(getTranslation(&quot;statusReplaceWhiteBackground&quot;),100) statusIndicator.Start(getTranslation(&quot;statusReplaceWhiteBackground&quot;),100)
@ -222,8 +167,6 @@ Private Sub quietCleaning
fixTableWidth fixTableWidth
statusIndicator.Start(getTranslation(&quot;statusConfigureImagesAnchors&quot;),100) statusIndicator.Start(getTranslation(&quot;statusConfigureImagesAnchors&quot;),100)
fixDrawingAnchors fixDrawingAnchors
saveAndreload()
statusIndicator = ThisComponent.getCurrentController.statusIndicator
statusIndicator.Start(getTranslation(&quot;statusFixFrequentMistakes&quot;),100) statusIndicator.Start(getTranslation(&quot;statusFixFrequentMistakes&quot;),100)
fixFrequentMistakes fixFrequentMistakes
statusIndicator.Start(getTranslation(&quot;statusRemovePageBreakAtStart&quot;),100) statusIndicator.Start(getTranslation(&quot;statusRemovePageBreakAtStart&quot;),100)
@ -233,28 +176,12 @@ Private Sub quietCleaning
statusIndicator.Start(getTranslation(&quot;statusLoadingStylesFromTemplate&quot;),100) statusIndicator.Start(getTranslation(&quot;statusLoadingStylesFromTemplate&quot;),100)
loadArticleStyles loadArticleStyles
removeLibs removeLibs
resetChapterNumberingRules
addTimeStampToProperties addTimeStampToProperties
saveCleanedVersion(&quot;Standard cleaning&quot;)
statusIndicator.end() statusIndicator.end()
saveAndreload() saveAndreload()
MsgBox getTranslation(&quot;cleaningFinished&quot;) MsgBox getTranslation(&quot;cleaningFinished&quot;)
End Sub End Sub
&apos;Sub RegisterListener (ThisComponent)
&apos; oListener = CreateUnoListener( &quot;DocumentListener_&quot;,&quot;com.sun.star.document.XEventListener&quot; )
&apos; ThisComponent.com_sun_star_document_XEventBroadcaster_addEventListener( oListener )
&apos;End Sub
&apos;Sub DocumentListener_notifyEvent( o as object )
&apos; If o.EventName = &quot;OnLoad&quot; Then
&apos; DocumentLoaded = true
&apos; EndIf
&apos;end sub
&apos;Sub DocumentListener_disposing()
&apos;End Sub
Private Sub removeFirstElementPageBreak Private Sub removeFirstElementPageBreak
Dim enum1 As Object Dim enum1 As Object
Dim enum1Element As Object Dim enum1Element As Object
@ -316,9 +243,7 @@ End Sub
Private Sub unicodeSymbolsConversion Private Sub unicodeSymbolsConversion
convertWLLatin2IPHAstra convertWLLatin2IPHAstra
convertSymbol
Dim sharedMarksRegExp As String
sharedMarksRegExp = &quot;([\u0020-\u002f\u003a\u003b\u00A0\u2010\u2013\u2014]+)?&quot;
Dim newFontName As String Dim newFontName As String
newFontName = &quot;IPH Astra Serif&quot; newFontName = &quot;IPH Astra Serif&quot;
Dim RAtts(2) as new com.sun.star.beans.PropertyValue Dim RAtts(2) as new com.sun.star.beans.PropertyValue
@ -334,18 +259,12 @@ Private Sub unicodeSymbolsConversion
&apos;Extended latin-1 0080—00FF &apos;Extended latin-1 0080—00FF
&apos;Cyrillic unicode block range \u0400-\u04FF &apos;Cyrillic unicode block range \u0400-\u04FF
&apos;Basic Latin \u0020-\u007E &apos;Basic Latin \u0020-\u007E
&apos;Combining diacritical marks 0301 0304 0303 0323 032e 0331 035f &apos;Combining diacritical marks 0301 0304 0323 032e 0331 035f
combiningDiacritic_Astra = &quot;\u0301\u0303\u0304\u0308\u0323\u032e\u0331\u0341\u035f&quot;
Dim extendedLatinA_Astra As String
extendedLatinA_Astra = &quot;\u1e15\u1e17\u1e53\u0129\u0169&quot;
&apos;
&apos;
&apos;
&apos;General Punctuation \u2000-\u206f &apos;General Punctuation \u2000-\u206f
&apos;Latin Extended A \u0100-\u017f &apos;Latin Extended A \u0100-\u017f
&apos;\u02bb Modifier Letter Turned Comma is in IPH Astra &apos;\u02bb Modifier Letter Turned Comma is in IPH Astra
&apos; unicodeConversionEverywhere(&quot;[\u0020-\u007F]+&quot;,RAtts) &apos; unicodeConversionEverywhere(&quot;[\u0020-\u007F]+&quot;,RAtts)
unicodeConversionEverywhere(&quot;[\u0020-\u007f\u0080-\u00ff\u0400-\u04ff\u2000-\u206f\u2100-\u214f\u02bb\u0100-\u017f&quot; &amp; combiningDiacritic_Astra &amp; extendedLatinA_Astra &amp;&quot;]+&quot;,RAtts) unicodeConversionEverywhere(&quot;[\u0020-\u007f\u0080-\u00ff\u0400-\u04ff\u2000-\u206f\u2100-\u214f\u0301\u0304\u0323\u032e\u0331\u0341\u035f\u02bb\u0100-\u017f]+&quot;,RAtts)
&apos;Arabic Scheherazade &apos;Arabic Scheherazade
&apos;Arabic Presentation Forms-A fb50-fdff &apos;Arabic Presentation Forms-A fb50-fdff
&apos;Arabic Presentation Forms-B fe70-feff &apos;Arabic Presentation Forms-B fe70-feff
@ -353,7 +272,7 @@ Private Sub unicodeSymbolsConversion
RAtts(0).Value = newFontName RAtts(0).Value = newFontName
RAtts(1).Value = newFontName RAtts(1).Value = newFontName
RAtts(2).Value = newFontName RAtts(2).Value = newFontName
unicodeConversionEverywhere(sharedMarksRegExp &amp; &quot;[\u0600-\u06ff\ufb50-\ufdff\ufe70-\ufeff]+&quot; &amp; sharedMarksRegExp ,RAtts) unicodeConversionEverywhere(&quot;[\u0600-\u06ff\ufb50-\ufdff\ufe70-\ufeff]+&quot;,RAtts)
&apos;Greek Tinos &apos;Greek Tinos
newFontName = &quot;Tinos&quot; newFontName = &quot;Tinos&quot;
@ -362,7 +281,7 @@ Private Sub unicodeSymbolsConversion
RAtts(2).Value = newFontName RAtts(2).Value = newFontName
&apos;Greek and Coptic 0370—03FF &apos;Greek and Coptic 0370—03FF
&apos;Greek extended 1F00—1FFF &apos;Greek extended 1F00—1FFF
unicodeConversionEverywhere(sharedMarksRegExp &amp; &quot;[\u0370-\u03ff\u1f00-\u1fff]+&quot; &amp; sharedMarksRegExp,RAtts) unicodeConversionEverywhere(&quot;[\u0370-\u03ff\u1f00-\u1fff]+&quot;,RAtts)
&apos;DejaVu Sans Mathematical operators &apos;DejaVu Sans Mathematical operators
@ -371,19 +290,16 @@ Private Sub unicodeSymbolsConversion
RAtts(1).Value = newFontName RAtts(1).Value = newFontName
RAtts(2).Value = newFontName RAtts(2).Value = newFontName
&apos;\u2200-\u22FF Mathematical operators &apos;\u2200-\u22FF Mathematical operators
&apos;\u2630-\u2637 Trigrams unicodeConversionEverywhere(&quot;[\u2200-\u22ff]+&quot;,RAtts)
&apos;\u4DC0-\u4DFF Trigrams
unicodeConversionEverywhere(&quot;[\u2200-\u22ff\u2630-\u2637\u4DC0-\u4DFF]+&quot;,RAtts)
newFontName = &quot;Noto Serif CJK JP&quot; newFontName = &quot;Noto Serif CJK JP&quot;
RAtts(0).Value = newFontName RAtts(0).Value = newFontName
RAtts(1).Value = newFontName RAtts(1).Value = newFontName
RAtts(2).Value = newFontName RAtts(2).Value = newFontName
&apos;\u2200-\u22FF CJK Unified Ideographs &apos;\u2200-\u22FF CJK Unified Ideographs
&apos;\u21d2 двойная стрелка вправо
&apos;3000—303F Символы и пунктуация ККЯ &apos;3000—303F Символы и пунктуация ККЯ
unicodeConversionEverywhere(sharedMarksRegExp &amp; &quot;[\u21d2\u302b\uff00-\uffef]+&quot; &amp; sharedMarksRegExp,RAtts) unicodeConversionEverywhere(&quot;[\u302b\uff00-\uffef]+&quot;,RAtts)
newFontName = &quot;Noto Serif CJK SC&quot; newFontName = &quot;Noto Serif CJK SC&quot;
RAtts(0).Value = newFontName RAtts(0).Value = newFontName
@ -393,7 +309,7 @@ Private Sub unicodeSymbolsConversion
&apos;\u4e00—\u9fff Унифицированные идеограммы ККЯ &apos;\u4e00—\u9fff Унифицированные идеограммы ККЯ
&apos;\u3400-\u4db7\u4e00—\u9ff1 Найдены в Noto Sans CJK SC &apos;\u3400-\u4db7\u4e00—\u9ff1 Найдены в Noto Sans CJK SC
&apos;\u3000-\u302a\u302c-\u303f В Noto Sans CJK SC &apos;\u3000-\u302a\u302c-\u303f В Noto Sans CJK SC
unicodeConversionEverywhere(sharedMarksRegExp &amp; &quot;[\u3000-\u302a\u302c-\u303f\u3400-\u4db7\u4e00-\u9ff1]+&quot; &amp; sharedMarksRegExp,RAtts) unicodeConversionEverywhere(&quot;[\u3000-\u302a\u302c-\u303f\u3400-\u4db7\u4e00-\u9ff1]+&quot;,RAtts)
End Sub End Sub
@ -460,34 +376,11 @@ Private Sub removeUserPageStyles
Next i Next i
End Sub End Sub
Sub removeAllFields()
Dim fields As Object
Dim fieldEnum As Object
Dim field As Object
fields = ThisComponent.getTextFields()
fieldEnum = fields.createEnumeration()
While fieldEnum.hasMoreElements
field = fieldEnum.nextElement()
field.dispose()
Wend
End Sub
Public Const RX_Greek_letters = &quot;\u0388-\u03ce&quot;
Public Const RX_Latin_up_alphabet = &quot;\u0041-\u005a&quot;
Public Const RX_Latin_low_alphabet = &quot;\u0061-\u007a&quot;
Public Const RX_Cyrillic_alphabet = &quot;\u0410-\u044f&quot;
Public Const RX_Comma = &quot;\u002c&quot;
Public Const RX_Digits = &quot;\u0030-\u0039&quot;
Public Const RX_Roman_numbers = &quot;MDCLXVI&quot;
Public Const RX_Letters_Dash = &quot;[&quot; &amp; RX_Latin_up_alphabet &amp; RX_Latin_low_alphabet &amp; RX_Cyrillic_alphabet &amp; RX_Greek_letters &amp; &quot;]&quot;
Public Const RX_Letters = &quot;[&quot; &amp; RX_Latin_up_alphabet &amp; RX_Latin_low_alphabet &amp; RX_Cyrillic_alphabet &amp; RX_Greek_letters &amp; &quot;]&quot;
Private Sub fixFrequentMistakes Private Sub fixFrequentMistakes
Dim config As Object Dim config As Object
config = initRedactionConfiguration() config = initRedactionConfiguration()
Dim NBSP As String Dim NBSP As String
Dim space As String Dim space As String
NBSP = &quot; &quot; NBSP = &quot; &quot;
space = &quot; &quot; space = &quot; &quot;
&apos;Не должно быть символов табуляции &apos;Не должно быть символов табуляции
@ -501,24 +394,21 @@ Private Sub fixFrequentMistakes
&apos;Не должно быть пустых абзацев &apos;Не должно быть пустых абзацев
AskAndReplace(&quot;^$&quot;,&quot;&quot;) AskAndReplace(&quot;^$&quot;,&quot;&quot;)
&apos;Не должно быть пробелов перед знаками пунктуации .,;:?!)]}»¡¿”‘’ &apos;Не должно быть пробелов перед знаками пунктуации .,;:?!)]}»¡¿”‘’
AskAndReplace(&quot;[:space:]+(?=[\.,;:?!\)\]\}»¡¿”’])&quot;,&quot;&quot;) AskAndReplace(&quot;[:space:]+(?=[\.,;:?!\)\]\}»¡¿”])&quot;,&quot;&quot;)
&apos;Не должно быть пробелов после скобок [({ и кавычек «„ &apos;Не должно быть пробелов после скобок [({ и кавычек «„
AskAndReplace(&quot;(?&lt;=[\(\[\{«„])[:space:]&quot;,&quot;&quot;) AskAndReplace(&quot;(?&lt;=[\(\[\{«„])[:space:]&quot;,&quot;&quot;)
&apos;Между буквами среднее или длинное тире должно быть замененено на среднее и обрамлено пробелами &apos;Между буквами среднее тире должно обрамляться пробелами
AskAndReplace(&quot;(?&lt;=&quot; &amp; RX_Letters_Dash &amp; &quot;)[—–]+(?=.)&quot;,NBSP &amp; &quot;&quot; &amp; NBSP) AskAndReplace(&quot;(?&lt;=[:alpha:])(?=[:alpha:])&quot;,NBSP &amp; &quot;&quot; &amp; NBSP)
AskAndReplace(&quot;(?&lt;=.)[—–]+(?=&quot; &amp; RX_Letters_Dash &amp; &quot;)&quot;,NBSP &amp; &quot;&quot; &amp; NBSP) &apos;Между буквами дефис-минус, цифровое тире и длинное тире заменяется на среднее тире
&apos;Между буквами дефисы-минусы, цифровые тире, средние тире и длинные тире заменяются на одно среднее тире AskAndReplace(&quot;(?&lt;=[:alpha:][:space:])[-‒—](?=[:space:][:alpha:])&quot;,&quot;&quot;)
AskAndReplace(&quot;(?&lt;=&quot; &amp; RX_Letters_Dash &amp; &quot;[:space:])[-‒—−–]+(?=[:space:].)&quot;,&quot;&quot;) &apos;Между двумя цифрами и тире между ними не долнжо быть пробелов. А также тире должно быть цифровым
AskAndReplace(&quot;(?&lt;=.[:space:])[-‒—−–]+(?=[:space:]&quot; &amp; RX_Letters_Dash &amp; &quot;)&quot;,&quot;&quot;) AskAndReplace(&quot;(?&lt;=[:digit:])(?:[:space:])?[-‒–—](?:[:space:])?(?=[:digit:])&quot;,&quot;&quot;)
&apos;Между двумя цифрами и тире не долнжо быть пробелов. А также тире должно быть цифровым.
&apos;Также проверяем, что перед искомым тире нет DOI
&apos;&apos;&apos;&apos;&apos;AskAndReplace(&quot;(?&lt;!DOI[0-9. /XVI:-‒–—−-]{1,50})(?&lt;=[:digit:])(?:[:space:])?[-‒–—−](?:[:space:])?(?=[:digit:])&quot;,&quot;&quot;)
&apos;Между двумя римскими цифрами и тире между ними не долнжо быть пробелов. А также тире должно быть средним &apos;Между двумя римскими цифрами и тире между ними не долнжо быть пробелов. А также тире должно быть средним
AskAndReplace(&quot;(?&lt;=[&quot; &amp; RX_Roman_numbers &amp; &quot;])(?:[:space:])?[-‒–—−]+(?:[:space:])?(?=[&quot; &amp; RX_Roman_numbers &amp; &quot;])&quot;,&quot;&quot;) AskAndReplace(&quot;(?&lt;=[MDCLXVI])(?:[:space:])?[-‒–—](?:[:space:])?(?=[MDCLXVI])&quot;,&quot;&quot;)
&apos;Между буквой и угловой открывающейся скобкой должен быть пробел &apos;Между буквой и угловой открывающейся скобкой должен быть пробел
AskAndReplace(&quot;(?&lt;=&quot; &amp; RX_Letters &amp; &quot;)&lt;(?=…&gt;)&quot;,space &amp; &quot;&lt;&quot;) AskAndReplace(&quot;(?&lt;=[:alpha:])&lt;(?=…&gt;)&quot;,space &amp; &quot;&lt;&quot;)
&apos;Между угловой закрывающейся скобкой и буквой должен быть пробел &apos;Между угловой закрывающейся скобкой и буквой должен быть пробел
AskAndReplace(&quot;(?&lt;=&lt;…)&gt;(?=&quot; &amp; RX_Letters &amp; &quot;)&quot;,&quot;&gt;&quot; &amp; space) AskAndReplace(&quot;(?&lt;=&lt;…)&gt;(?=[:alpha:])&quot;,&quot;&gt;&quot; &amp; space)
If config.getPropertyValue(&quot;fixes_russian_iph&quot;) = &quot;true&quot; Then If config.getPropertyValue(&quot;fixes_russian_iph&quot;) = &quot;true&quot; Then
&apos;между N. Y. не должно быть пробела &apos;между N. Y. не должно быть пробела
@ -552,22 +442,21 @@ Private Sub fixFrequentMistakes
End Sub End Sub
Private Sub loadArticleStyles Private Sub loadArticleStyles
Dim dispatcher As Object Dim dispatcher As Object
Dim filePath As String Dim filePath As String
Dim fileTest As Object Dim fileTest As Object
Dim predefined As String Dim fileName As String
Dim aArgs(0) As New com.sun.star.beans.PropertyValue Dim aArgs(0) As New com.sun.star.beans.PropertyValue
Dim config As Object Dim config As Object
config = initRedactionConfiguration() config = initRedactionConfiguration()
predefined = config.getPropertyValue(&quot;predefined_template&quot;) fileName = config.getPropertyValue(&quot;defaultTemplate&quot;)
filePath = getTemplateFile(predefined) filePath = getTemplatePath() &amp; &quot;/&quot; &amp; fileName
fileTest = CreateUnoService(&quot;com.sun.star.ucb.SimpleFileAccess&quot;) fileTest = CreateUnoService(&quot;com.sun.star.ucb.SimpleFileAccess&quot;)
If NOT fileTest.exists(filePath) Then If NOT fileTest.exists(filePath) Then
configureStyleFileDialog() noStylesFileDialog()
predefined = config.getPropertyValue(&quot;predefined_template&quot;) fileName = config.getPropertyValue(&quot;defaultTemplate&quot;)
filePath = getTemplateFile(predefined) filePath = getTemplatePath() &amp; &quot;/&quot; &amp; fileName
If NOT fileTest.exists(filePath) Then If NOT fileTest.exists(filePath) Then
&apos;MsgBox &quot;Файл стилей &quot; &amp; fileName &amp; &quot; не добавлен в Мои шаблоны. Не могу загрузить стили в текущий файл.&quot; &apos;MsgBox &quot;Файл стилей &quot; &amp; fileName &amp; &quot; не добавлен в Мои шаблоны. Не могу загрузить стили в текущий файл.&quot;
Exit Sub Exit Sub
@ -642,13 +531,13 @@ End Function
Private Sub removeHyperlinks() Private Sub removeHyperlinks()
Dim aNote As Object Dim aNote As Object
Dim x As Long Dim i As Long
removeHLInText(ThisComponent.Text) removeHLInText(ThisComponent.Text)
For x = 0 to ThisComponent.FootNotes.Count -1 For i = 0 to ThisComponent.FootNotes.Count -1
aNote = ThisComponent.FootNotes.getByIndex(x) aNote = ThisComponent.FootNotes.getByIndex(x)
removeHLInText(aNote.Text) removeHLInText(aNote.Text)
Next Next
For x = 0 to ThisComponent.EndNotes.Count -1 For i = 0 to ThisComponent.EndNotes.Count -1
aNote = ThisComponent.EndNotes.getByIndex(x) aNote = ThisComponent.EndNotes.getByIndex(x)
removeHLInText(aNote.Text) removeHLInText(aNote.Text)
Next Next
@ -785,24 +674,10 @@ End Sub
Private Sub saveAndreload() Private Sub saveAndreload()
Dim document As Object Dim document As Object
Dim dispatcher As Object Dim dispatcher As Object
&apos;Dim timeOut As Long
&apos;timeOut = 0
&apos;DocumentLoaded = false
document = ThisComponent.CurrentController.Frame document = ThisComponent.CurrentController.Frame
dispatcher = createUnoService(&quot;com.sun.star.frame.DispatchHelper&quot;) dispatcher = createUnoService(&quot;com.sun.star.frame.DispatchHelper&quot;)
dispatcher.executeDispatch(document, &quot;.uno:Save&quot;, &quot;&quot;, 0, Array()) dispatcher.executeDispatch(document, &quot;.uno:Save&quot;, &quot;&quot;, 0, Array())
dispatcher.executeDispatch(document, &quot;.uno:Reload&quot;, &quot;&quot;, 0, Array())
Wait 1000
&apos;RegisterListener (ThisComponent)
&apos;Do while DocumentLoaded = false
&apos; Wait 300
&apos; timeOut = timeOut + 300
&apos; If timeOut &gt; 30000 Then
&apos; MsgBox &quot;Time out&quot;
&apos; Exit sub
&apos; EndIf
&apos;Loop
&apos;DocumentLoaded = false
End Sub End Sub
@ -1435,29 +1310,6 @@ Private Sub replaceWhiteBackgroundWithTransparent
statusIndicator.end() statusIndicator.end()
End Sub End Sub
Sub convertSymbol
Dim newFontName As String
Dim oSearchString As String
Dim oReplaceString As String
&apos;newFontName = &quot;IPH Astra Serif&quot;
Dim SrchAttributes(0) as new com.sun.star.beans.PropertyValue
Dim ReplAttributes(0) as new com.sun.star.beans.PropertyValue
SrchAttributes(0).Name = &quot;CharFontName&quot;
SrchAttributes(0).Value = &quot;Symbol&quot;
ReplAttributes(0).Name = &quot;CharFontName&quot;
ReplAttributes(0).Value = &quot;Noto Serif CJK JP&quot;
oSearchString = &quot;\uF0DE&quot;
oReplaceString = &quot;⇒&quot;
ReplaceFormatting(oSearchString,oReplaceString,SrchAttributes,ReplAttributes, false)
oSearchString = &quot;\uF0DB&quot;
oReplaceString = &quot;⇔&quot;
ReplaceFormatting(oSearchString,oReplaceString,SrchAttributes,ReplAttributes, false)
&apos;replaceFontsInStyles( &quot;WL LatinAllIn1Goth&quot;, newFontName)
End Sub
Private Sub convertWLLatin2IPHAstra Private Sub convertWLLatin2IPHAstra
Dim newFontName As String Dim newFontName As String
Dim oSearchString As String Dim oSearchString As String
@ -1473,7 +1325,7 @@ Private Sub convertWLLatin2IPHAstra
SrchAttributes(0).Value = Empty SrchAttributes(0).Value = Empty
ReplAttributes(0).Value = Empty ReplAttributes(0).Value = Empty
&apos;Replace macron below &apos;Replace macron below
oSearchString = &quot;(.)(\uF0D4)+&quot; oSearchString = &quot;(.)\uF0D4&quot;
oReplaceString = &quot;$1̱&quot; oReplaceString = &quot;$1̱&quot;
&apos;from WL &apos;from WL
ReplaceFormatting(oSearchString,oReplaceString,SrchAttributes,ReplAttributes, false) ReplaceFormatting(oSearchString,oReplaceString,SrchAttributes,ReplAttributes, false)
@ -1482,7 +1334,7 @@ Private Sub convertWLLatin2IPHAstra
ReplaceFormatting(oSearchString,oReplaceString,SrchAttributes,ReplAttributes, false) ReplaceFormatting(oSearchString,oReplaceString,SrchAttributes,ReplAttributes, false)
&apos;Replace dot below &apos;Replace dot below
oSearchString = &quot;(.)(\uF0D6)+&quot; oSearchString = &quot;(.)\uF0D6&quot;
oReplaceString = &quot;$1̣&quot; oReplaceString = &quot;$1̣&quot;
&apos;from WL &apos;from WL
ReplaceFormatting(oSearchString,oReplaceString,SrchAttributes,ReplAttributes, false) ReplaceFormatting(oSearchString,oReplaceString,SrchAttributes,ReplAttributes, false)
@ -1491,25 +1343,16 @@ Private Sub convertWLLatin2IPHAstra
ReplaceFormatting(oSearchString,oReplaceString,SrchAttributes,ReplAttributes, false) ReplaceFormatting(oSearchString,oReplaceString,SrchAttributes,ReplAttributes, false)
&apos;replace macron &apos;replace macron
oSearchString = &quot;(.)(\uF0F4)+&quot; oSearchString = &quot;(.)\uF0F4&quot;
oReplaceString = &quot;$1̄&quot; oReplaceString = &quot;$1̄&quot;
&apos;from WL &apos;from WL
ReplaceFormatting(oSearchString,oReplaceString,SrchAttributes,ReplAttributes, false) ReplaceFormatting(oSearchString,oReplaceString,SrchAttributes,ReplAttributes, false)
&apos;from unicode to remove direct formatting &apos;from unicode to remove direct formatting
oSearchString = &quot;(.)\u0304&quot; oSearchString = &quot;(.)\u0304&quot;
ReplaceFormatting(oSearchString,oReplaceString,SrchAttributes,ReplAttributes, false) ReplaceFormatting(oSearchString,oReplaceString,SrchAttributes,ReplAttributes, false)
&apos;replace space
oSearchString = &quot;\uF020&quot;
oReplaceString = &quot; &quot;
ReplaceFormatting(oSearchString,oReplaceString,SrchAttributes,ReplAttributes, false)
&apos;replace comma
oSearchString = &quot;\uF02C&quot;
oReplaceString = &quot;,&quot;
ReplaceFormatting(oSearchString,oReplaceString,SrchAttributes,ReplAttributes, false)
&apos;replace accent &apos;replace accent
oSearchString = &quot;(.)(\uF0F1)+&quot; oSearchString = &quot;(.)\uF0F1&quot;
oReplaceString = &quot;$1́&quot; oReplaceString = &quot;$1́&quot;
ReplaceFormatting(oSearchString,oReplaceString,SrchAttributes,ReplAttributes, false) ReplaceFormatting(oSearchString,oReplaceString,SrchAttributes,ReplAttributes, false)
&apos;from unicode to remove direct formatting &apos;from unicode to remove direct formatting
@ -1526,18 +1369,9 @@ Function getVersion As String
getVersion=oProduct.getByName(&quot;ooSetupVersion&quot;) getVersion=oProduct.getByName(&quot;ooSetupVersion&quot;)
End Function End Function
Function getFullVersion As String
GlobalScope.BasicLibraries.LoadLibrary(&quot;Tools&quot;)
Dim oProduct As Object
oProduct=GetRegistryKeyContent(&quot;org.openoffice.Setup/Product&quot;)
getFullVersion=oProduct.getByName(&quot;ooSetupVersionAboutBox&quot;)
End Function
Private Sub convertFormatToUserFields(identifier As String, styleNames, styleValues) Private Sub convertFormatToUserFields(identifier As String, styleNames, styleValues)
Dim maxLength As Integer
maxLength = getMaxLength(identifier)
Dim leftField As String Dim leftField As String
Dim rightField As String Dim rightField As String
Dim i As Integer Dim i As Integer
@ -1561,31 +1395,15 @@ Private Sub convertFormatToUserFields(identifier As String, styleNames, styleVal
i = 0 i = 0
Do While not isNull(found) Do While not isNull(found)
If Len(found.String) &lt;&gt; 0 AND NOT IsNull(found.Text) Then If Len(found.String) &lt;&gt; 0 AND NOT IsNull(found.Text) Then
If maxLength &lt; 0 Or Len(found.String) &lt; maxLength Then
insertUserField(found.End,rightField &amp; i,&quot;&quot;) insertUserField(found.End,rightField &amp; i,&quot;&quot;)
insertUserField(found.start,leftField &amp; i,&quot;&quot;) insertUserField(found.start,leftField &amp; i,&quot;&quot;)
i = i + 1 i = i + 1
EndIf EndIf
EndIf
found = Thiscomponent.findNext(found.End, SDesc) found = Thiscomponent.findNext(found.End, SDesc)
Loop Loop
End Sub End Sub
Function getMaxLength(identifier As String) As Integer
Dim config As Object
config = initRedactionConfiguration()
If identifier = &quot;SubScript&quot; Then
getMaxLength = CInt(config.getPropertyValue(&quot;subscript_max_length&quot;))
Exit Function
EndIf
If identifier = &quot;SuperScript&quot; Then
getMaxLength = CInt(config.getPropertyValue(&quot;superscript_max_length&quot;))
Exit Function
EndIf
getMaxLength = -1
End Function
Private Sub convertUserFieldsToFormat(identifier As String, styleNames , styleValues) Private Sub convertUserFieldsToFormat(identifier As String, styleNames , styleValues)
Dim oTextCursor As Object Dim oTextCursor As Object
Dim oMasters As Object Dim oMasters As Object
@ -1911,10 +1729,6 @@ sub saveAsDocAndBackToODT
Dim path As String Dim path As String
Dim tmpName As String Dim tmpName As String
Dim oldName As String Dim oldName As String
&apos;Dim timeOut As Long
&apos;timeOut = 0
&apos;DocumentLoaded = false
document = ThisComponent.CurrentController.Frame document = ThisComponent.CurrentController.Frame
dispatcher = createUnoService(&quot;com.sun.star.frame.DispatchHelper&quot;) dispatcher = createUnoService(&quot;com.sun.star.frame.DispatchHelper&quot;)
oldName = ThisComponent.getURL() oldName = ThisComponent.getURL()
@ -1930,17 +1744,6 @@ sub saveAsDocAndBackToODT
args1(1).Value = &quot;writer8&quot; args1(1).Value = &quot;writer8&quot;
dispatcher.executeDispatch(document, &quot;.uno:SaveAs&quot;, &quot;&quot;, 0, args1()) dispatcher.executeDispatch(document, &quot;.uno:SaveAs&quot;, &quot;&quot;, 0, args1())
dispatcher.executeDispatch(document, &quot;.uno:Reload&quot;, &quot;&quot;, 0, Array()) dispatcher.executeDispatch(document, &quot;.uno:Reload&quot;, &quot;&quot;, 0, Array())
&apos;RegisterListener (ThisComponent)
&apos;Do while DocumentLoaded = false
&apos; Wait 300
&apos; timeOut = timeOut + 300
&apos; If timeOut &gt; 30000 Then
&apos; MsgBox &quot;Time out&quot;
&apos; Exit sub
&apos; EndIf
&apos;Loop
&apos;DocumentLoaded = false
If FileExists(tmpName) Then If FileExists(tmpName) Then
Kill(tmpName) Kill(tmpName)
End If End If
@ -1954,236 +1757,8 @@ Sub addTimeStampToProperties
curTime = Now() curTime = Now()
docProps = ThisComponent.getDocumentProperties() docProps = ThisComponent.getDocumentProperties()
userProps = docProps.UserDefinedProperties() userProps = docProps.UserDefinedProperties()
userProps.addProperty(curTime ,128,&quot;Cleaned by&quot; &amp; getUserName() &amp; &quot; with &quot; &amp; redactionExtensionVersion &amp; &quot; LO &quot; &amp; getFullVersion() ) userProps.addProperty(curTime ,128,&quot;Cleaned &quot; &amp; redactionExtensionVersion)
exceptionHandlerProps: exceptionHandlerProps:
Resume Next Resume Next
End Sub End Sub
Function getUserName() As String
Dim oCP As Object
Dim oCUA As Object
Dim aProps(0) As New com.sun.star.beans.PropertyValue
oCP = GetProcessServiceManager().createInstance( &quot;com.sun.star.configuration.ConfigurationProvider&quot; )
aProps(0).Name = &quot;nodepath&quot;
aProps(0).Value = &quot;/org.openoffice.UserProfile/Data&quot;
oCUA = oCP.createInstanceWithArguments( &quot;com.sun.star.configuration.ConfigurationUpdateAccess&quot;, aProps )
getUserName = &quot; &quot; &amp; oCUA.getByName(&quot;givenname&quot;) &amp; &quot; &quot; &amp; oCUA.getByName(&quot;sn&quot;)
End Function
sub saveCleanedVersion(comment)
dim document as object
dim dispatcher as object
document = ThisComponent.CurrentController.Frame
dispatcher = createUnoService(&quot;com.sun.star.frame.DispatchHelper&quot;)
dim args1(0) as new com.sun.star.beans.PropertyValue
args1(0).Name = &quot;VersionComment&quot;
args1(0).Value = comment
dispatcher.executeDispatch(document, &quot;.uno:Save&quot;, &quot;&quot;, 0, args1())
end Sub
Sub resetChapterNumberingRules
Dim chapNumRules As Object
Dim numRulesProps As Variant
Dim numRuleProperty As Variant
Dim i As Integer
chapNumRules = ThisComponent.ChapterNumberingRules
For i = 0 To chapNumRules.Count - 1
numRulesProps = chapNumRules.getByIndex(i)
For n = LBound(numRulesProps) To UBound(numRulesProps)
numRuleProperty = numRulesProps(n)
If (numRuleProperty.Name = &quot;Prefix&quot;) Then
numRuleProperty.Value = &quot;&quot;
End If
If (numRuleProperty.Name = &quot;Suffix&quot;) Then
numRuleProperty.Value = &quot;&quot;
End If
If (numRuleProperty.Name = &quot;CharStyleName&quot;) Then
numRuleProperty.Value = &quot;Standard&quot;
End If
numRulesProps(n) = numRuleProperty
Next n
chapNumRules.replaceByIndex(i,numRulesProps)
Next i
End Sub
Private Sub replaceNumHyphen
StartTracking
replaceNumHyphenRegExp
StopTracking
End Sub
Sub replaceNumHyphenRegExp
AskAndReplace(&quot;(?&lt;!DOI[0-9. /XVI:-‒–—−-]{1,50})(?&lt;=[:digit:])(?:[:space:])?[-‒–—−](?:[:space:])?(?=[:digit:])&quot;,&quot;&quot;)
End sub
Sub fixBrokenCharBackTransparent
Dim footNotes As Object
Dim endNotes As Object
Dim i As Integer
Dim oStyles As Object
Dim pageStyles As Object
Dim pageStyle As Object
footNotes = thisComponent.footNotes
For i = 0 to footNotes.Count -1
setDefaultBackColorInText(footNotes.getByIndex(i).Text)
Next i
endNotes = thisComponent.footNotes
For i = 0 to footNotes.Count -1
setDefaultBackColorInText(endNotes.getByIndex(i).Text)
Next i
oStyles = ThisComponent.StyleFamilies
pageStyles = oStyles.getByName(oStyles.elementNames(2))
For i = 0 to pageStyles.Count -1
pageStyle = pageStyles.getByIndex(i)
If Not IsEmpty(pageStyle.FooterText) Then
setDefaultBackColorInText(pageStyle.FooterText)
EndIf
If Not IsEmpty(pageStyle.FooterTextFirst) Then
setDefaultBackColorInText(pageStyle.FooterTextFirst)
EndIf
If Not IsEmpty(pageStyle.FooterTextRight) Then
setDefaultBackColorInText(pageStyle.FooterTextRight)
EndIf
If Not IsEmpty(pageStyle.FooterTextLeft) Then
setDefaultBackColorInText(pageStyle.FooterTextLeft)
EndIf
If Not IsEmpty(pageStyle.HeaderText) Then
setDefaultBackColorInText(pageStyle.HeaderText)
EndIf
If Not IsEmpty(pageStyle.HeaderTextFirst) Then
setDefaultBackColorInText(pageStyle.HeaderTextFirst)
EndIf
If Not IsEmpty(pageStyle.HeaderTextRight) Then
setDefaultBackColorInText(pageStyle.HeaderTextRight)
EndIf
If Not IsEmpty(pageStyle.HeaderTextLeft) Then
setDefaultBackColorInText(pageStyle.HeaderTextLeft)
EndIf
Next i
setDefaultBackColorInText(ThisComponent.Text)
End Sub
Sub setDefaultBackColorInText(oText As Object)
If IsMissing(oText) Then
Exit sub
End If
Dim enum1Element As Object
Dim enum1 As Object
Dim enum2 As Object
Dim thisPortion As Object
Dim footnoteText As Object
Dim label As String
Dim labelNum As Integer
Dim i As Integer
Dim count As Integer
Dim cell As Object
Dim cellText As Object
enum1 = oText.Text.createEnumeration
While enum1.hasMoreElements
enum1Element = enum1.nextElement
If enum1Element.supportsService(&quot;com.sun.star.text.Paragraph&quot;) Then
If enum1Element.CharBackTransparent = false Then
enum1Element.setPropertyToDefault(&quot;CharBackTransparent&quot;)
EndIf
ElseIf enum1Element.supportsService(&quot;com.sun.star.text.TextTable&quot;) Then
cellNames = enum1Element.cellNames
For i = LBound(cellNames) To Ubound(cellNames)
cell = enum1Element.getCellByName(cellNames(i))
cellText = cell.getText()
setDefaultBackColorInText(cellText)
Next i
EndIf
Wend
End Sub
Function fixColoredBackgroundInDoc() As Boolean
Dim founds As Object
Dim sDesc As Object
Dim i As Long
Dim foundObjects() As Object
Dim SrchAttributes(0) as new com.sun.star.beans.PropertyValue
SrchAttributes(0).Name = &quot;CharBackTransparent&quot;
SrchAttributes(0).Value = False
sDesc = Thiscomponent.createSearchDescriptor()
sDesc.SearchAll = true
sDesc.ValueSearch = false
sDesc.SearchRegularExpression = true
sDesc.searchStyles = true
sDesc.SetSearchAttributes(SrchAttributes())
founds = Thiscomponent.findAll(sDesc)
If founds.count &lt;&gt; 0 Then
foundObjects = convertXIndexAccessToArray(founds)
For i = LBound(foundObjects) To UBound(foundObjects)
foundObjects(i).CharBackTransparent = false
foundObjects(i).CharBackColor = -1
Next i
EndIf
End Function
Sub fixDiacriticKerning
Dim oSearch As Object
Dim oFound As Object
Dim oPara As Object
oSearch = ThisComponent.createSearchDescriptor()
oSearch.SearchString = &quot;[\u0300-\u036F]&quot;
oSearch.SearchRegularExpression=True
oSearch.searchAll=True
oFound = ThisComponent.findFirst(oSearch)
Do While Not IsNull(oFound)
oPara = oFound.TextParagraph
fixDiacriticKerningInPara(oPara)
oFound = ThisComponent.findNext(oFound.End, oSearch)
Loop
End Sub
Sub fixDiacriticKerningInPara(oPara As Object)
Dim paraEnum As Object
Dim portion As Object
Dim prevPortion As Object
paraEnum = oPara.createEnumeration
If paraEnum.hasMoreElements Then
prevPortion = paraEnum.nextElement
While paraEnum.hasMoreElements
portion = paraEnum.nextElement
While isFirstCharDiacritic(portion)
moveFirstCharacter(portion, prevPortion)
Wend
prevPortion = portion
Wend
EndIf
End Sub
Function isFirstCharDiacritic(portion As Object) As Boolean
isFirstCharDiacritic = false
Dim portionText As String
Dim diaLowBound As Long
Dim diaHighBound As Long
Dim charNum As Long
diaLowBound = 768
diaHighBound = 879
portionText = portion.String
If Len(portionText) = 0 Then
Exit Function
EndIf
charNum = Asc(portionText)
If charNum &gt;= diaLowBound And charNum &lt;= diaHighBound Then
isFirstCharDiacritic = true
EndIf
End Function
Sub moveFirstCharacter(portion As Object, prevPortion As Object)
Dim prevEnd As Object
Dim nextStart As Object
prevEnd = prevPortion.getEnd()
prevEnd.String = Left(portion.String,1)
nextStart = portion.Text.createTextCursorByRange(portion.Start)
nextStart.goRight(1,true)
nextStart.setString(&quot;&quot;)
End Sub
</script:module> </script:module>

View file

@ -1,36 +1,27 @@
<?xml version="1.0" encoding="UTF-8"?> <?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE dlg:window PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "dialog.dtd"> <!DOCTYPE dlg:window PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "dialog.dtd">
<dlg:window xmlns:dlg="http://openoffice.org/2000/dialog" xmlns:script="http://openoffice.org/2000/script" dlg:id="CleaningDialog" dlg:left="107" dlg:top="22" dlg:width="237" dlg:height="285" dlg:help-text="&amp;21.CleaningDialog.HelpText" dlg:closeable="true" dlg:moveable="true" dlg:title="&amp;22.CleaningDialog.Title"> <dlg:window xmlns:dlg="http://openoffice.org/2000/dialog" xmlns:script="http://openoffice.org/2000/script" dlg:id="CleaningDialog" dlg:left="107" dlg:top="22" dlg:width="237" dlg:height="190" dlg:help-text="&amp;21.CleaningDialog.HelpText" dlg:closeable="true" dlg:moveable="true" dlg:title="&amp;22.CleaningDialog.Title">
<dlg:bulletinboard> <dlg:bulletinboard>
<dlg:button dlg:id="Cancel" dlg:tab-index="0" dlg:left="28" dlg:top="271" dlg:width="40" dlg:height="12" dlg:value="Отмена" dlg:button-type="cancel"/> <dlg:button dlg:id="Cancel" dlg:tab-index="0" dlg:left="28" dlg:top="173" dlg:width="40" dlg:height="12" dlg:value="Отмена" dlg:button-type="cancel"/>
<dlg:button dlg:id="CommandButton1" dlg:tab-index="1" dlg:left="24" dlg:top="180" dlg:width="2" dlg:height="0" dlg:value="CommandButton1"/> <dlg:button dlg:id="CommandButton1" dlg:tab-index="1" dlg:left="24" dlg:top="170" dlg:width="2" dlg:height="0" dlg:value="CommandButton1"/>
<dlg:button dlg:id="OK" dlg:tab-index="2" dlg:left="92" dlg:top="271" dlg:width="40" dlg:height="12" dlg:value="OK" dlg:button-type="ok"/> <dlg:button dlg:id="OK" dlg:tab-index="2" dlg:left="92" dlg:top="173" dlg:width="40" dlg:height="12" dlg:value="OK" dlg:button-type="ok"/>
<dlg:checkbox dlg:id="fontsInStyles" dlg:tab-index="3" dlg:left="11" dlg:top="10" dlg:width="218" dlg:height="7" dlg:value="Заменить названия шрифтов в стилях" dlg:checked="false"/> <dlg:checkbox dlg:id="fontsInStyles" dlg:tab-index="3" dlg:left="11" dlg:top="10" dlg:width="218" dlg:height="7" dlg:value="Заменить названия шрифтов в стилях" dlg:checked="false"/>
<dlg:checkbox dlg:id="removeLinks" dlg:tab-index="6" dlg:left="11" dlg:top="60" dlg:width="218" dlg:height="7" dlg:value="Удалить гиперссылки" dlg:checked="false"/> <dlg:checkbox dlg:id="removeLinks" dlg:tab-index="6" dlg:left="11" dlg:top="50" dlg:width="218" dlg:height="7" dlg:value="Удалить гиперссылки" dlg:checked="false"/>
<dlg:checkbox dlg:id="cleanFormatting" dlg:tab-index="5" dlg:left="11" dlg:top="30" dlg:width="218" dlg:height="7" dlg:value="Очистить форматирование" dlg:checked="false"/> <dlg:checkbox dlg:id="cleanFormatting" dlg:tab-index="5" dlg:left="11" dlg:top="30" dlg:width="218" dlg:height="7" dlg:value="Очистить форматирование" dlg:checked="false"/>
<dlg:checkbox dlg:id="removeBookmarks" dlg:tab-index="7" dlg:left="11" dlg:top="70" dlg:width="218" dlg:height="7" dlg:value="Удалить закладки" dlg:checked="false"/> <dlg:checkbox dlg:id="removeBookmarks" dlg:tab-index="7" dlg:left="11" dlg:top="60" dlg:width="218" dlg:height="7" dlg:value="Удалить закладки" dlg:checked="false"/>
<dlg:checkbox dlg:id="configTables" dlg:tab-index="8" dlg:left="11" dlg:top="80" dlg:width="218" dlg:height="7" dlg:value="Настроить свойства таблиц" dlg:checked="false"/> <dlg:checkbox dlg:id="configTables" dlg:tab-index="8" dlg:left="11" dlg:top="70" dlg:width="218" dlg:height="7" dlg:value="Настроить свойства таблиц" dlg:checked="false"/>
<dlg:checkbox dlg:id="configAnchors" dlg:tab-index="9" dlg:left="11" dlg:top="90" dlg:width="218" dlg:height="7" dlg:value="Настроить привязки изображений" dlg:checked="false"/> <dlg:checkbox dlg:id="configAnchors" dlg:tab-index="9" dlg:left="11" dlg:top="80" dlg:width="218" dlg:height="7" dlg:value="Настроить привязки изображений" dlg:checked="false"/>
<dlg:checkbox dlg:id="fixMistakes" dlg:tab-index="10" dlg:left="11" dlg:top="100" dlg:width="218" dlg:height="7" dlg:value="Исправить часто встречающиеся ошибки набора" dlg:checked="false"/> <dlg:checkbox dlg:id="fixMistakes" dlg:tab-index="10" dlg:left="11" dlg:top="90" dlg:width="218" dlg:height="7" dlg:value="Исправить часто встречающиеся ошибки набора" dlg:checked="false"/>
<dlg:checkbox dlg:id="removeInitPageBreak" dlg:tab-index="11" dlg:left="11" dlg:top="120" dlg:width="218" dlg:height="7" dlg:value="Удалить разрыв страницы в начале документа" dlg:checked="false"/> <dlg:checkbox dlg:id="removeInitPageBreak" dlg:tab-index="11" dlg:left="11" dlg:top="100" dlg:width="218" dlg:height="7" dlg:value="Удалить разрыв страницы в начале документа" dlg:checked="false"/>
<dlg:checkbox dlg:id="removePageStyles" dlg:tab-index="12" dlg:left="11" dlg:top="130" dlg:width="218" dlg:height="7" dlg:value="Удалить пользовательские стили страниц" dlg:checked="false"/> <dlg:checkbox dlg:id="removePageStyles" dlg:tab-index="12" dlg:left="11" dlg:top="110" dlg:width="218" dlg:height="7" dlg:value="Удалить пользовательские стили страниц" dlg:checked="false"/>
<dlg:checkbox dlg:id="loadStandardStyles" dlg:tab-index="13" dlg:left="11" dlg:top="140" dlg:width="218" dlg:height="7" dlg:value="Загрузить стили страниц из шаблона Статья.ott" dlg:checked="false"/> <dlg:checkbox dlg:id="loadStandardStyles" dlg:tab-index="13" dlg:left="11" dlg:top="120" dlg:width="218" dlg:height="7" dlg:value="Загрузить стили страниц из шаблона Статья.ott" dlg:checked="false"/>
<dlg:checkbox dlg:id="symbolsConversion" dlg:tab-index="4" dlg:left="11" dlg:top="20" dlg:width="218" dlg:height="7" dlg:value="Произвести конвертацию символов" dlg:checked="false"/> <dlg:checkbox dlg:id="symbolsConversion" dlg:tab-index="4" dlg:left="11" dlg:top="20" dlg:width="218" dlg:height="7" dlg:value="Произвести конвертацию символов" dlg:checked="false"/>
<dlg:checkbox dlg:id="removeUnusedStyles" dlg:tab-index="14" dlg:left="11" dlg:top="150" dlg:width="218" dlg:height="7" dlg:value="Удалить неиспользуемые стили" dlg:checked="false"/> <dlg:checkbox dlg:id="removeUnusedStyles" dlg:tab-index="14" dlg:left="11" dlg:top="130" dlg:width="218" dlg:height="7" dlg:value="Удалить неиспользуемые стили" dlg:checked="false"/>
<dlg:checkbox dlg:id="removeManualPageBreaks" dlg:tab-index="15" dlg:left="11" dlg:top="160" dlg:width="218" dlg:height="7" dlg:value="Удалить все разрывы страниц" dlg:checked="false"/> <dlg:checkbox dlg:id="removeManualPageBreaks" dlg:tab-index="15" dlg:left="11" dlg:top="140" dlg:width="218" dlg:height="7" dlg:value="Удалить все разрывы страниц" dlg:checked="false"/>
<dlg:checkbox dlg:id="replaceWhiteBackground" dlg:tab-index="16" dlg:left="11" dlg:top="40" dlg:width="218" dlg:height="7" dlg:value="Заменить белый фон символов на прозрачный" dlg:checked="false"/> <dlg:checkbox dlg:id="replaceWhiteBackground" dlg:tab-index="16" dlg:left="11" dlg:top="40" dlg:width="218" dlg:height="7" dlg:value="Заменить белый фон символов на прозрачный" dlg:checked="false"/>
<dlg:checkbox dlg:id="removeBasic" dlg:tab-index="17" dlg:left="11" dlg:top="170" dlg:width="218" dlg:height="7" dlg:value="Удалить макросы" dlg:checked="false"/> <dlg:checkbox dlg:id="removeBasic" dlg:tab-index="17" dlg:left="11" dlg:top="150" dlg:width="218" dlg:height="7" dlg:value="Удалить макросы" dlg:checked="false"/>
<dlg:button dlg:id="buttonLoad" dlg:tab-index="18" dlg:left="158" dlg:top="271" dlg:width="65" dlg:height="12" dlg:value="loadTemplate"> <dlg:button dlg:id="buttonLoad" dlg:tab-index="18" dlg:left="158" dlg:top="172" dlg:width="52" dlg:height="12" dlg:value="loadTemplate">
<script:event script:event-name="on-performaction" script:macro-name="vnd.sun.star.script:Redaction.Configuration.configureStyleFileDialog?language=Basic&amp;location=application" script:language="Script"/> <script:event script:event-name="on-performaction" script:macro-name="vnd.sun.star.script:Redaction.Configuration.setDeafultTemplate?language=Basic&amp;location=application" script:language="Script"/>
</dlg:button> </dlg:button>
<dlg:checkbox dlg:id="removeAllFields" dlg:tab-index="19" dlg:left="11" dlg:top="180" dlg:width="218" dlg:height="7" dlg:value="Удалить все поля" dlg:checked="false"/>
<dlg:checkbox dlg:id="fixDOI" dlg:tab-index="20" dlg:left="11" dlg:top="110" dlg:width="218" dlg:height="7" dlg:value="Исправить DOI" dlg:checked="false"/>
<dlg:checkbox dlg:id="resetChapterNumberingRules" dlg:tab-index="21" dlg:left="11" dlg:top="190" dlg:width="218" dlg:height="7" dlg:value="Сбросить настройки нумерации глав" dlg:checked="false"/>
<dlg:checkbox dlg:id="replaceNumHyphen" dlg:tab-index="22" dlg:left="11" dlg:top="200" dlg:width="218" dlg:height="7" dlg:value="Исправить тире между цифрами" dlg:checked="false"/>
<dlg:checkbox dlg:id="convertFontsToCharStyles" dlg:tab-index="23" dlg:left="11" dlg:top="210" dlg:width="218" dlg:height="7" dlg:value="Конвертировать шрифты в стили символов" dlg:checked="false"/>
<dlg:checkbox dlg:id="fixBrokenCharBackTransparent" dlg:tab-index="24" dlg:left="11" dlg:top="220" dlg:width="218" dlg:height="7" dlg:value="fixBrokenCharBackTransparent" dlg:checked="false"/>
<dlg:checkbox dlg:id="removeNotTransparentBackgrounds" dlg:tab-index="25" dlg:left="11" dlg:top="50" dlg:width="218" dlg:height="7" dlg:value="Удалить непрозрачные фоны в тексте" dlg:checked="false"/>
<dlg:text dlg:id="description" dlg:tab-index="26" dlg:left="11" dlg:top="251" dlg:width="217" dlg:height="16" dlg:value="Label1" dlg:multiline="true"/>
<dlg:checkbox dlg:id="fixDiacriticKerning" dlg:tab-index="27" dlg:left="11" dlg:top="230" dlg:width="218" dlg:height="7" dlg:value="Fix diacritic kerning" dlg:checked="false"/>
</dlg:bulletinboard> </dlg:bulletinboard>
</dlg:window> </dlg:window>

View file

@ -7,9 +7,5 @@
<dlg:button dlg:id="CommandButton1" dlg:tab-index="2" dlg:left="-132" dlg:top="41" dlg:width="2" dlg:height="0" dlg:value="CommandButton1"/> <dlg:button dlg:id="CommandButton1" dlg:tab-index="2" dlg:left="-132" dlg:top="41" dlg:width="2" dlg:height="0" dlg:value="CommandButton1"/>
<dlg:button dlg:id="CANCEL" dlg:tab-index="3" dlg:left="83" dlg:top="85" dlg:width="59" dlg:height="13" dlg:value="Отмена" dlg:button-type="cancel"/> <dlg:button dlg:id="CANCEL" dlg:tab-index="3" dlg:left="83" dlg:top="85" dlg:width="59" dlg:height="13" dlg:value="Отмена" dlg:button-type="cancel"/>
<dlg:checkbox dlg:id="cb_russian_fixes_iph" dlg:tab-index="4" dlg:left="5" dlg:top="26" dlg:width="150" dlg:height="11" dlg:value="Исправления для института философии" dlg:checked="true"/> <dlg:checkbox dlg:id="cb_russian_fixes_iph" dlg:tab-index="4" dlg:left="5" dlg:top="26" dlg:width="150" dlg:height="11" dlg:value="Исправления для института философии" dlg:checked="true"/>
<dlg:textfield dlg:id="tf_max_subscript" dlg:tab-index="7" dlg:left="5" dlg:top="52" dlg:width="24" dlg:height="12" dlg:value="10000"/>
<dlg:text dlg:id="label_max_subscript" dlg:tab-index="8" dlg:left="32" dlg:top="52" dlg:width="123" dlg:height="11" dlg:value="Label1"/>
<dlg:text dlg:id="label_max_superscript" dlg:tab-index="6" dlg:left="32" dlg:top="39" dlg:width="123" dlg:height="11" dlg:value="Label1"/>
<dlg:textfield dlg:id="tf_max_superscript" dlg:tab-index="5" dlg:left="5" dlg:top="38" dlg:width="24" dlg:height="12" dlg:value="10000"/>
</dlg:bulletinboard> </dlg:bulletinboard>
</dlg:window> </dlg:window>

View file

@ -1,58 +1,24 @@
<?xml version="1.0" encoding="UTF-8"?> <?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE script:module PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "module.dtd"> <!DOCTYPE script:module PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "module.dtd">
<script:module xmlns:script="http://openoffice.org/2000/script" script:name="Configuration" script:language="StarBasic" script:moduleType="normal">Public Const redactionExtensionName = &quot;cleanAndValidate&quot; <script:module xmlns:script="http://openoffice.org/2000/script" script:name="Configuration" script:language="StarBasic" script:moduleType="normal">Public Const redactionExtensionName As String = &quot;cleanAndValidate&quot;
Public Const redactionExtensionVersion = &quot;0.10.11&quot; Public Const redactionExtensionVersion = &quot;0.7.19&quot;
Public Const template_name_monography = &quot;Монография&quot;
Public Const template_name_pj = &quot;Философский журнал&quot;
Public Const template_name_pq = &quot;Вопросы философии&quot;
Public Const template_name_hp = &quot;История философии&quot;
Public Const template_name_hpe = &quot;Историко-философский ежегодник&quot;
Public Const template_name_pr = &quot;Философия религии&quot;
Public Const template_name_fnit = &quot;Философия науки и техники&quot;
Public Const template_name_pa = &quot;Философская антропология&quot;
Public Const template_name_pcr = &quot;Проблемы цивилизационного развития&quot;
Public Const template_name_eifn = &quot;Эпистемология и философия науки&quot;
Public Const template_name_et = &quot;Этическая мысль&quot;
Public Const template_name_ephe = &quot;Электронная философская энциклопедия&quot;
Public Const template_name_iph_big = &quot;Большой формат издания&quot;
Public Const template_manual = &quot;custom_selected_template&quot;
Public Const articles_path = &quot;/templates/articles/&quot;
Function initRedactionConfiguration() Function initRedactionConfiguration()
On Error Goto exceptionHandler On Error Goto exceptionHandler
Dim regFactory As Object Dim regFactory As Object
Dim reg As Object Dim reg As Object
Dim redactionProps As Object Dim redactionProps As Object
Dim props(2) As New com.sun.star.beans.PropertyValue Dim props(2) As New com.sun.star.beans.PropertyValue
Dim propSetInfo As Object
regFactory = CreateUnoService(&quot;com.sun.star.ucb.Store&quot;) regFactory = CreateUnoService(&quot;com.sun.star.ucb.Store&quot;)
reg = regFactory.createPropertySetRegistry(redactionExtensionName) reg = regFactory.createPropertySetRegistry(redactionExtensionName)
redactionProps = reg.openPropertySet(redactionExtensionName, TRUE) redactionProps = reg.openPropertySet(redactionExtensionName, TRUE)
propSetInfo = redactionProps.getPropertySetInfo()
If Not propSetInfo.hasPropertyByName(&quot;superscript_max_length&quot;) Then
redactionProps.addProperty(&quot;superscript_max_length&quot;, 128, &quot;10&quot;)
EndIf
If Not propSetInfo.hasPropertyByName(&quot;subscript_max_length&quot;) Then
redactionProps.addProperty(&quot;subscript_max_length&quot;, 128, &quot;10&quot;)
EndIf
If Not propSetInfo.hasPropertyByName(&quot;fixes_russian_iph&quot;) Then
redactionProps.addProperty(&quot;fixes_russian_iph&quot;, 128, &quot;true&quot;) redactionProps.addProperty(&quot;fixes_russian_iph&quot;, 128, &quot;true&quot;)
EndIf
If Not propSetInfo.hasPropertyByName(&quot;predefined_template&quot;) Then
redactionProps.addProperty(&quot;predefined_template&quot;, 128, &quot;false&quot;)
EndIf
If Not propSetInfo.hasPropertyByName(&quot;complexity&quot;) Then
redactionProps.addProperty(&quot;complexity&quot;, 128, &quot;user&quot;) redactionProps.addProperty(&quot;complexity&quot;, 128, &quot;user&quot;)
EndIf
exceptionHandler: exceptionHandler:
Resume Next Resume Next
On Error Goto exceptionHandler2 On Error Goto exceptionHandler2
If Not propSetInfo.hasPropertyByName(&quot;defaultTemplate&quot;) Then
redactionProps.addProperty(&quot;defaultTemplate&quot;, 128, &quot;Статья.ott&quot;) redactionProps.addProperty(&quot;defaultTemplate&quot;, 128, &quot;Статья.ott&quot;)
EndIf
If Not propSetInfo.hasPropertyByName(&quot;predefined_template&quot;) Then
redactionProps.addProperty(&quot;predefined_template&quot;, 128, &quot;false&quot;)
EndIf
exceptionHandler2: exceptionHandler2:
Resume Next Resume Next
initRedactionConfiguration = redactionProps initRedactionConfiguration = redactionProps
@ -74,9 +40,6 @@ Private Sub setConfigFromDialog(dialog As Object)
config.setPropertyValue(&quot;fixes_russian_iph&quot;, &quot;false&quot;) config.setPropertyValue(&quot;fixes_russian_iph&quot;, &quot;false&quot;)
EndIf EndIf
config.setPropertyValue(&quot;superscript_max_length&quot;, dialog.getControl(&quot;tf_max_superscript&quot;).getText())
config.setPropertyValue(&quot;subscript_max_length&quot;, dialog.getControl(&quot;tf_max_subscript&quot;).getText())
End Sub End Sub
Private Sub loadConfigToDialog(dialog As Object) Private Sub loadConfigToDialog(dialog As Object)
@ -94,10 +57,6 @@ Private Sub loadConfigToDialog(dialog As Object)
dialog.getControl(&quot;cb_russian_fixes_iph&quot;).state = 0 dialog.getControl(&quot;cb_russian_fixes_iph&quot;).state = 0
EndIf EndIf
dialog.getControl(&quot;tf_max_superscript&quot;).setText(config.getPropertyValue(&quot;superscript_max_length&quot;))
dialog.getControl(&quot;tf_max_subscript&quot;).setText(config.getPropertyValue(&quot;subscript_max_length&quot;))
End Sub End Sub
@ -108,10 +67,6 @@ Private Sub configurationDialog
loadConfigToDialog(dialog) loadConfigToDialog(dialog)
dialog.getControl(&quot;CB_complexity&quot;).Label = getTranslation(&quot;dialogConfigComplexity&quot;) dialog.getControl(&quot;CB_complexity&quot;).Label = getTranslation(&quot;dialogConfigComplexity&quot;)
dialog.getControl(&quot;cb_russian_fixes_iph&quot;).Label = getTranslation(&quot;dialogRussianFixesIPH&quot;) dialog.getControl(&quot;cb_russian_fixes_iph&quot;).Label = getTranslation(&quot;dialogRussianFixesIPH&quot;)
dialog.getControl(&quot;label_max_superscript&quot;).setText(getTranslation(&quot;dialogConfigMaxSuperscript&quot;))
dialog.getControl(&quot;label_max_subscript&quot;).setText(getTranslation(&quot;dialogConfigMaxSubscript&quot;))
dialog.Title = getTranslation(&quot;dialogConfigTitle&quot;) dialog.Title = getTranslation(&quot;dialogConfigTitle&quot;)
dialog.getControl(&quot;OK&quot;).Label = getTranslation(&quot;buttonYes&quot;) dialog.getControl(&quot;OK&quot;).Label = getTranslation(&quot;buttonYes&quot;)
dialog.getControl(&quot;CANCEL&quot;).Label = getTranslation(&quot;buttonStop&quot;) dialog.getControl(&quot;CANCEL&quot;).Label = getTranslation(&quot;buttonStop&quot;)
@ -126,152 +81,71 @@ Private Sub configurationDialog
Exit sub Exit sub
End Sub End Sub
Dim queitCleaningDialog As Object
Private Sub quietStartDialog Private Sub quietStartDialog
Dim dialog As Object
DialogLibraries.LoadLibrary(&quot;Redaction&quot;) DialogLibraries.LoadLibrary(&quot;Redaction&quot;)
queitCleaningDialog = CreateUnoDialog(DialogLibraries.Redaction.StartQuietCleaning) dialog = CreateUnoDialog(DialogLibraries.Redaction.StartQuietCleaning)
Dim description As String
Dim buttonNameOk As String Dim buttonNameOk As String
Dim buttonNameStop As String Dim buttonNameStop As String
Dim buttonNameLoad As String Dim buttonNameLoad As String
Dim dialogTitle As String Dim dialogTitle As String
description = getTranslation(&quot;startQuietCleaningDescription&quot;)
buttonNameOk = getTranslation(&quot;buttonYes&quot;) buttonNameOk = getTranslation(&quot;buttonYes&quot;)
buttonNameStop = getTranslation(&quot;buttonStop&quot;) buttonNameStop = getTranslation(&quot;buttonStop&quot;)
buttonNameLoad = getTranslation(&quot;buttonLoad&quot;) buttonNameLoad = getTranslation(&quot;buttonLoad&quot;)
dialogTitle = getTranslation(&quot;quietStartCleaningTitle&quot;) dialogTitle = getTranslation(&quot;quietStartCleaningTitle&quot;)
queitCleaningDialog.Title = dialogTitle dialog.Title = dialogTitle
setQuietDialogDescription() dialog.getControl(&quot;Description&quot;).setText(description)
queitCleaningDialog.getControl(&quot;buttonOk&quot;).Label = buttonNameOk dialog.getControl(&quot;buttonOk&quot;).Label = buttonNameOk
queitCleaningDialog.getControl(&quot;buttonStop&quot;).Label = buttonNameStop dialog.getControl(&quot;buttonStop&quot;).Label = buttonNameStop
queitCleaningDialog.getControl(&quot;buttonLoad&quot;).Label = buttonNameLoad dialog.getControl(&quot;buttonLoad&quot;).Label = buttonNameLoad
queitCleaningDialog.setVisible(true) dialog.setVisible(true)
Select Case queitCleaningDialog.Execute() Select Case dialog.Execute()
Case 1 Case 1
queitCleaningDialog.setVisible(false) dialog.setVisible(false)
queitCleaningDialog.dispose() dialog.dispose()
quietCleaning quietCleaning
Case 0 Case 0
queitCleaningDialog.setVisible(false) dialog.setVisible(false)
queitCleaningDialog.dispose() dialog.dispose()
End Select End Select
Exit sub Exit sub
End Sub End Sub
Function setAdvancedDialogDescription() Private Sub noStylesFileDialog
If IsNull(advancedCleaningDialog) Then
Exit Function
EndIf
Dim config As Object
Dim description As String
Dim predefined As String
Dim customFile As String
config = initRedactionConfiguration()
predefined = config.getPropertyValue(&quot;predefined_template&quot;)
customFile = config.getPropertyValue(&quot;defaultTemplate&quot;)
If predefined = &quot;false&quot; Then
description = getTranslation(&quot;templateNotSelected&quot;)
ElseIf predefined = template_manual Then
description = getTranslation(&quot;templateChosen&quot;) &amp; &quot; «&quot; &amp; customFile &amp; &quot;»&quot;
Else
description = getTranslation(&quot;templateChosen&quot;) &amp; &quot; «&quot; &amp; predefined &amp; &quot;»&quot;
EndIf
advancedCleaningDialog.getControl(&quot;description&quot;).setText(description)
End Function
Function setQuietDialogDescription()
If IsNull(queitCleaningDialog) Then
Exit Function
EndIf
Dim config As Object
Dim description As String
Dim predefined As String
Dim customFile As String
config = initRedactionConfiguration()
predefined = config.getPropertyValue(&quot;predefined_template&quot;)
customFile = config.getPropertyValue(&quot;defaultTemplate&quot;)
If predefined = &quot;false&quot; Then
description = getTranslation(&quot;startQuietCleaningDescription1&quot;) &amp; &quot; &quot; &amp; getTranslation(&quot;startQuietCleaningDescription2&quot;)
ElseIf predefined = template_manual Then
description = getTranslation(&quot;startQuietCleaningDescription1&quot;) &amp; &quot; «&quot; &amp; customFile &amp; &quot;» &quot; &amp; getTranslation(&quot;startQuietCleaningDescription2&quot;)
Else
description = getTranslation(&quot;startQuietCleaningDescription1&quot;) &amp; &quot; «&quot; &amp; predefined &amp; &quot;» &quot; &amp; getTranslation(&quot;startQuietCleaningDescription2&quot;)
EndIf
queitCleaningDialog.getControl(&quot;Description&quot;).setText(description)
End Function
Dim styleFileDialog As Object
Private Sub configureStyleFileDialog
&apos;Globalscope.BasicLibraries.LoadLibrary( &quot;MRILib&quot; ) &apos;Globalscope.BasicLibraries.LoadLibrary( &quot;MRILib&quot; )
Dim config As Object
Dim dialog As Object Dim dialog As Object
Dim predefined As String
Dim description As String
Dim customFile As String
DialogLibraries.LoadLibrary(&quot;Redaction&quot;) DialogLibraries.LoadLibrary(&quot;Redaction&quot;)
styleFileDialog = CreateUnoDialog(DialogLibraries.Redaction.NoStyleFile) dialog = CreateUnoDialog(DialogLibraries.Redaction.NoStyleFile)
config = initRedactionConfiguration() Dim description As String
predefined = config.getPropertyValue(&quot;predefined_template&quot;) Dim buttonName As String
customFile = config.getPropertyValue(&quot;defaultTemplate&quot;) Dim dialogTitle As String
If predefined = &quot;false&quot; Then Dim buttonTemplateNotFoundSkip As String
dialogTitle = getTranslation(&quot;noStylesFileDialogTitle&quot;)
description = getTranslation(&quot;noFileWithStylesFound&quot;) description = getTranslation(&quot;noFileWithStylesFound&quot;)
ElseIf predefined = template_manual Then buttonName = getTranslation(&quot;buttonNameToSelectFileWithStyles&quot;)
description = getTranslation(&quot;manualStyleFileSet&quot;) &amp; &quot; «&quot; &amp; customFile &amp; &quot;»&quot; buttonTemplateNotFoundSkip = getTranslation(&quot;buttonTemplateNotFoundSkip&quot;)
Else dialog.Title = dialogTitle
description = getTranslation(&quot;predefiendTemplateSelected&quot;) &amp; &quot; «&quot; &amp; predefined &amp; &quot;»&quot; dialog.getControl(&quot;Description&quot;).setText(description)
EndIf dialog.getControl(&quot;FileSelection&quot;).Label = buttonName
styleFileDialog.Title = getTranslation(&quot;noStylesFileDialogTitle&quot;) dialog.getControl(&quot;buttonOk&quot;).Label = buttonTemplateNotFoundSkip
styleFileDialog.getControl(&quot;Description&quot;).setText(description)
styleFileDialog.getControl(&quot;FileSelection&quot;).Label = getTranslation(&quot;buttonNameToSelectFileWithStyles&quot;)
styleFileDialog.getControl(&quot;buttonOk&quot;).Label = getTranslation(&quot;buttonTemplateNotFoundSkip&quot;)
styleFileDialog.setVisible(true)
Select Case styleFileDialog.Execute()
Case 0
End Select
setQuietDialogDescription()
setAdvancedDialogDescription()
styleFileDialog.setVisible(false)
styleFileDialog.dispose()
End Sub
Sub selectTemplateDialog()
Dim config As Object
Dim description As String
Dim templateName As String
Dim templateNames() As String
Dim i As Integer
Dim listComponent As Object
config = initRedactionConfiguration()
Dim dialog As Object
DialogLibraries.LoadLibrary(&quot;Redaction&quot;)
dialog = CreateUnoDialog(DialogLibraries.Redaction.SelectTemplate)
listComponent = dialog.getControl(&quot;ListBox&quot;)
dialog.getControl(&quot;buttonOk&quot;).Label = getTranslation(&quot;buttonYes&quot;)
dialog.getControl(&quot;buttonStop&quot;).Label = getTranslation(&quot;buttonStop&quot;)
dialog.Title = getTranslation(&quot;selectTemplateDialogTitle&quot;)
templateNames = getTemplateNames()
listComponent.addItems(templateNames , 0)
dialog.setVisible(true) dialog.setVisible(true)
Select Case dialog.Execute() Select Case dialog.Execute()
Case 1 Case 1
templateName = listComponent.SelectedItem setDeafultTemplate()
If NOT (templateName=&quot;0&quot; or templateName=&quot;&quot;) Then
config.setPropertyValue(&quot;predefined_template&quot;, templateName)
description = getTranslation(&quot;predefiendTemplateSelected&quot;) &amp; &quot; «&quot; &amp; templateName &amp; &quot;»&quot;
styleFileDialog.getControl(&quot;Description&quot;).setText(description)
EndIf
Case 0 Case 0
End Select End Select
dialog.setVisible(false) dialog.setVisible(false)
dialog.dispose() dialog.dispose()
Exit sub
End Sub End Sub
Sub setManualTemplate()
Dim description As String
Sub setDeafultTemplate()
Dim selectedTemplate As String Dim selectedTemplate As String
selectedTemplate = getFileURLDialog() selectedTemplate = getFileURLDialog()
oSimpleFileAccess = CreateUnoService( &quot;com.sun.star.ucb.SimpleFileAccess&quot; ) oSimpleFileAccess = CreateUnoService( &quot;com.sun.star.ucb.SimpleFileAccess&quot; )
@ -283,13 +157,9 @@ Sub setManualTemplate()
config = initRedactionConfiguration() config = initRedactionConfiguration()
fileName = Dir(selectedTemplate) fileName = Dir(selectedTemplate)
config.setPropertyValue(&quot;defaultTemplate&quot;,fileName) config.setPropertyValue(&quot;defaultTemplate&quot;,fileName)
config.setPropertyValue(&quot;predefined_template&quot;, template_manual)
Dim templatePath As String Dim templatePath As String
templatePath = getTemplatePath() templatePath = getTemplatePath()
MkDir(templatePath)
FileCopy(selectedTemplate, templatePath &amp; &quot;/&quot; &amp; fileName) FileCopy(selectedTemplate, templatePath &amp; &quot;/&quot; &amp; fileName)
description = getTranslation(&quot;manualStyleFileSet&quot;) &amp; &quot; «&quot; &amp; fileName &amp; &quot;»&quot;
styleFileDialog.getControl(&quot;Description&quot;).setText(description)
End Sub End Sub
Function getFileURLDialog() As String Function getFileURLDialog() As String
@ -322,80 +192,4 @@ Function getFileURLDialog() As String
End If End If
getFileURLDialog = &quot;&quot; getFileURLDialog = &quot;&quot;
End Function End Function
Function getTemplateNames() As Variant
Dim names() As String
&apos; AddToArray(names, template_name_monography)
AddToArray(names, template_name_pq)
AddToArray(names, template_name_hp)
AddToArray(names, template_name_hpe)
AddToArray(names, template_name_pr)
AddToArray(names, template_name_fnit)
AddToArray(names, template_name_pa)
AddToArray(names, template_name_pj)
AddToArray(names, template_name_pcr)
AddToArray(names, template_name_eifn)
AddToArray(names, template_name_et)
AddToArray(names, template_name_ephe)
AddToArray(names, template_name_iph_big)
getTemplateNames = names
End Function
Function extensionPath() As String
Dim oPackageInfoProvider As Object
oPackageInfoProvider = GetDefaultContext.getByName(&quot;/singletons/com.sun.star.deployment.PackageInformationProvider&quot;)
extensionPath = oPackageInfoProvider.getPackageLocation(&quot;pro.litvinovg.Redaction&quot;)
End Function
Function getTemplateFile(templateName As String) As String
Dim config As Object
Dim fileName As String
Select Case templateName
Case template_manual
config = initRedactionConfiguration()
fileName = config.getPropertyValue(&quot;defaultTemplate&quot;)
getTemplateFile = getTemplatePath() &amp; &quot;/&quot; &amp; fileName
Exit Function
Case template_name_eifn
getTemplateFile = extensionPath() &amp; articles_path &amp; &quot;статья_эифн.ott&quot;
Exit Function
Case template_name_fnit
getTemplateFile = extensionPath() &amp; articles_path &amp; &quot;статья_фнит.ott&quot;
Exit Function
Case template_name_pa
getTemplateFile = extensionPath() &amp; articles_path &amp; &quot;статья_фа.ott&quot;
Exit Function
Case template_name_pj
getTemplateFile = extensionPath() &amp; articles_path &amp; &quot;статья_фж.ott&quot;
Exit Function
Case template_name_et
getTemplateFile = extensionPath() &amp; articles_path &amp; &quot;статья_эм.ott&quot;
Exit Function
Case template_name_pq
getTemplateFile = extensionPath() &amp; articles_path &amp; &quot;статья_вф.ott&quot;
Exit Function
Case template_name_pr
getTemplateFile = extensionPath() &amp; articles_path &amp; &quot;статья_фр.ott&quot;
Exit Function
Case template_name_pcr
getTemplateFile = extensionPath() &amp; articles_path &amp; &quot;статья_пцр.ott&quot;
Exit Function
Case template_name_hp
getTemplateFile = extensionPath() &amp; articles_path &amp; &quot;статья_иф.ott&quot;
Exit Function
Case template_name_hpe
getTemplateFile = extensionPath() &amp; articles_path &amp; &quot;статья_ифе.ott&quot;
Exit Function
Case template_name_ephe
getTemplateFile = extensionPath() &amp; articles_path &amp; &quot;статья_эфэ.ott&quot;
Exit Function
Case template_name_iph_big
getTemplateFile = extensionPath() &amp; &quot;/templates/books/большой_формат_для_архива.ott&quot;
Exit Function
Case Else
getTemplateFile = extensionPath() &amp; articles_path &amp; &quot;статья.ott&quot;
Exit Function
End Select
End Function
</script:module> </script:module>

View file

@ -1,12 +0,0 @@
<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE dlg:window PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "dialog.dtd">
<dlg:window xmlns:dlg="http://openoffice.org/2000/dialog" xmlns:script="http://openoffice.org/2000/script" dlg:id="Navigator" dlg:left="0" dlg:top="50" dlg:width="100" dlg:height="123" dlg:closeable="true" dlg:moveable="true">
<dlg:bulletinboard>
<dlg:text dlg:id="description" dlg:tab-index="1" dlg:left="2" dlg:top="5" dlg:width="96" dlg:height="47" dlg:value="описание объектов для навигации" dlg:align="center" dlg:multiline="true"/>
<dlg:button dlg:id="close" dlg:tab-index="2" dlg:left="2" dlg:top="105" dlg:width="96" dlg:height="15" dlg:value="Закрыть навигатор" dlg:toggled="1"/>
<dlg:button dlg:id="next" dlg:tab-index="0" dlg:left="67" dlg:top="70" dlg:width="30" dlg:height="30" dlg:toggled="1"/>
<dlg:text dlg:id="current" dlg:tab-index="4" dlg:left="36" dlg:top="81" dlg:width="28" dlg:height="15" dlg:value="current" dlg:align="center"/>
<dlg:text dlg:id="found" dlg:tab-index="5" dlg:left="2" dlg:top="55" dlg:width="96" dlg:height="12" dlg:value="Всего найдено" dlg:align="center"/>
<dlg:button dlg:id="prev" dlg:tab-index="3" dlg:left="3" dlg:top="70" dlg:width="30" dlg:height="30" dlg:valign="center" dlg:toggled="1"/>
</dlg:bulletinboard>
</dlg:window>

View file

@ -1,15 +1,10 @@
<?xml version="1.0" encoding="UTF-8"?> <?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE dlg:window PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "dialog.dtd"> <!DOCTYPE dlg:window PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "dialog.dtd">
<dlg:window xmlns:dlg="http://openoffice.org/2000/dialog" xmlns:script="http://openoffice.org/2000/script" dlg:id="NoStyleFile" dlg:left="140" dlg:top="101" dlg:width="243" dlg:height="98" dlg:help-text="&amp;5.NoStyleFile.HelpText" dlg:closeable="true" dlg:moveable="true" dlg:title="&amp;6.NoStyleFile.Title"> <dlg:window xmlns:dlg="http://openoffice.org/2000/dialog" xmlns:script="http://openoffice.org/2000/script" dlg:id="NoStyleFile" dlg:left="140" dlg:top="101" dlg:width="239" dlg:height="98" dlg:help-text="&amp;5.NoStyleFile.HelpText" dlg:closeable="true" dlg:moveable="true" dlg:title="&amp;6.NoStyleFile.Title">
<dlg:bulletinboard> <dlg:bulletinboard>
<dlg:button dlg:id="CommandButton2" dlg:tab-index="2" dlg:left="167" dlg:top="139" dlg:width="1" dlg:height="0" dlg:help-text="&amp;15.NoStyleFile.CommandButton2.HelpText" dlg:value="&amp;16.NoStyleFile.CommandButton2.Label"/> <dlg:button dlg:id="CommandButton2" dlg:tab-index="1" dlg:left="167" dlg:top="139" dlg:width="1" dlg:height="0" dlg:help-text="&amp;15.NoStyleFile.CommandButton2.HelpText" dlg:value="&amp;16.NoStyleFile.CommandButton2.Label"/>
<dlg:button dlg:id="FileSelection" dlg:tab-index="3" dlg:left="12" dlg:top="75" dlg:width="65" dlg:height="13" dlg:help-text="&amp;19.NoStyleFile.FileSelection.HelpText" dlg:value="&amp;20.NoStyleFile.FileSelection.Label"> <dlg:button dlg:id="FileSelection" dlg:tab-index="2" dlg:left="46" dlg:top="75" dlg:width="60" dlg:height="13" dlg:help-text="&amp;19.NoStyleFile.FileSelection.HelpText" dlg:value="&amp;20.NoStyleFile.FileSelection.Label" dlg:button-type="ok"/>
<script:event script:event-name="on-performaction" script:macro-name="vnd.sun.star.script:Redaction.Configuration.setManualTemplate?language=Basic&amp;location=application" script:language="Script"/> <dlg:text dlg:id="Description" dlg:tab-index="3" dlg:left="23" dlg:top="13" dlg:width="192" dlg:height="52" dlg:help-text="&amp;27.NoStyleFile.Description.HelpText" dlg:value="&amp;28.NoStyleFile.Description.Label"/>
</dlg:button> <dlg:button dlg:id="buttonOk" dlg:tab-index="0" dlg:left="138" dlg:top="75" dlg:width="60" dlg:height="13" dlg:help-text="&amp;13.NoStyleFile.CommandButton1.HelpText" dlg:value="ok" dlg:button-type="cancel"/>
<dlg:text dlg:id="Description" dlg:tab-index="4" dlg:left="12" dlg:top="13" dlg:width="219" dlg:height="52" dlg:help-text="&amp;27.NoStyleFile.Description.HelpText" dlg:value="&amp;28.NoStyleFile.Description.Label" dlg:multiline="true"/>
<dlg:button dlg:id="buttonOk" dlg:tab-index="0" dlg:left="166" dlg:top="75" dlg:width="65" dlg:height="13" dlg:help-text="&amp;13.NoStyleFile.CommandButton1.HelpText" dlg:value="ok" dlg:button-type="cancel"/>
<dlg:button dlg:id="ListSelection" dlg:tab-index="1" dlg:left="89" dlg:top="75" dlg:width="65" dlg:height="13" dlg:help-text="&amp;19.NoStyleFile.FileSelection.HelpText" dlg:value="Выбрать из списка">
<script:event script:event-name="on-performaction" script:macro-name="vnd.sun.star.script:Redaction.Configuration.selectTemplateDialog?language=Basic&amp;location=application" script:language="Script"/>
</dlg:button>
</dlg:bulletinboard> </dlg:bulletinboard>
</dlg:window> </dlg:window>

View file

@ -1,9 +0,0 @@
<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE dlg:window PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "dialog.dtd">
<dlg:window xmlns:dlg="http://openoffice.org/2000/dialog" xmlns:script="http://openoffice.org/2000/script" dlg:id="SelectTemplate" dlg:left="146" dlg:top="89" dlg:width="220" dlg:height="202" dlg:closeable="true" dlg:moveable="true" dlg:title="Choose template with styles">
<dlg:bulletinboard>
<dlg:menulist dlg:id="ListBox" dlg:tab-index="0" dlg:left="1" dlg:top="3" dlg:width="218" dlg:height="175"/>
<dlg:button dlg:id="buttonOk" dlg:tab-index="1" dlg:left="26" dlg:top="185" dlg:width="65" dlg:height="13" dlg:value="Ok" dlg:button-type="ok"/>
<dlg:button dlg:id="buttonStop" dlg:tab-index="2" dlg:left="126" dlg:top="185" dlg:width="65" dlg:height="13" dlg:value="Cancel" dlg:button-type="cancel"/>
</dlg:bulletinboard>
</dlg:window>

View file

@ -2,11 +2,11 @@
<!DOCTYPE dlg:window PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "dialog.dtd"> <!DOCTYPE dlg:window PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "dialog.dtd">
<dlg:window xmlns:dlg="http://openoffice.org/2000/dialog" xmlns:script="http://openoffice.org/2000/script" dlg:id="StartQuietCleaning" dlg:left="124" dlg:top="101" dlg:width="222" dlg:height="96" dlg:help-text="&amp;29.StartQuietCleaning.HelpText" dlg:closeable="true" dlg:moveable="true" dlg:title="&amp;30.StartQuietCleaning.Title"> <dlg:window xmlns:dlg="http://openoffice.org/2000/dialog" xmlns:script="http://openoffice.org/2000/script" dlg:id="StartQuietCleaning" dlg:left="124" dlg:top="101" dlg:width="222" dlg:height="96" dlg:help-text="&amp;29.StartQuietCleaning.HelpText" dlg:closeable="true" dlg:moveable="true" dlg:title="&amp;30.StartQuietCleaning.Title">
<dlg:bulletinboard> <dlg:bulletinboard>
<dlg:text dlg:id="Description" dlg:tab-index="1" dlg:left="15" dlg:top="8" dlg:width="194" dlg:height="56" dlg:help-text="&amp;33.StartQuietCleaning.Description.HelpText" dlg:value="&amp;34.StartQuietCleaning.Description.Label" dlg:multiline="true"/> <dlg:text dlg:id="Description" dlg:tab-index="0" dlg:left="15" dlg:top="18" dlg:width="194" dlg:height="40" dlg:help-text="&amp;33.StartQuietCleaning.Description.HelpText" dlg:value="&amp;34.StartQuietCleaning.Description.Label"/>
<dlg:button dlg:id="buttonOk" dlg:tab-index="0" dlg:left="15" dlg:top="71" dlg:width="60" dlg:height="17" dlg:help-text="&amp;55.StartQuietCleaning.buttonOk.HelpText" dlg:value="&amp;56.StartQuietCleaning.buttonOk.Label" dlg:button-type="ok"/> <dlg:button dlg:id="buttonOk" dlg:tab-index="1" dlg:left="15" dlg:top="71" dlg:width="52" dlg:height="17" dlg:help-text="&amp;55.StartQuietCleaning.buttonOk.HelpText" dlg:value="&amp;56.StartQuietCleaning.buttonOk.Label" dlg:button-type="ok"/>
<dlg:button dlg:id="buttonStop" dlg:tab-index="3" dlg:left="83" dlg:top="71" dlg:width="60" dlg:height="17" dlg:help-text="&amp;57.StartQuietCleaning.buttonStop.HelpText" dlg:value="&amp;58.StartQuietCleaning.buttonStop.Label" dlg:button-type="cancel"/> <dlg:button dlg:id="buttonStop" dlg:tab-index="3" dlg:left="84" dlg:top="71" dlg:width="52" dlg:height="17" dlg:help-text="&amp;57.StartQuietCleaning.buttonStop.HelpText" dlg:value="&amp;58.StartQuietCleaning.buttonStop.Label" dlg:button-type="cancel"/>
<dlg:button dlg:id="buttonLoad" dlg:tab-index="2" dlg:left="149" dlg:top="71" dlg:width="60" dlg:height="17" dlg:help-text="&amp;59.StartQuietCleaning.buttonLoad.HelpText" dlg:value="&amp;60.StartQuietCleaning.buttonLoad.Label"> <dlg:button dlg:id="buttonLoad" dlg:tab-index="2" dlg:left="156" dlg:top="71" dlg:width="52" dlg:height="17" dlg:help-text="&amp;59.StartQuietCleaning.buttonLoad.HelpText" dlg:value="&amp;60.StartQuietCleaning.buttonLoad.Label">
<script:event script:event-name="on-performaction" script:macro-name="vnd.sun.star.script:Redaction.Configuration.configureStyleFileDialog?language=Basic&amp;location=application" script:language="Script"/> <script:event script:event-name="on-performaction" script:macro-name="vnd.sun.star.script:Redaction.Configuration.setDeafultTemplate?language=Basic&amp;location=application" script:language="Script"/>
</dlg:button> </dlg:button>
</dlg:bulletinboard> </dlg:bulletinboard>
</dlg:window> </dlg:window>

View file

@ -27,13 +27,10 @@ End Function
Function getRussian(identifier As String) As String Function getRussian(identifier As String) As String
Select Case identifier Select Case identifier
Case &quot;noFileWithStylesFound&quot; Case &quot;noFileWithStylesFound&quot;
getRussian = &quot;Файл-шаблон, содержащий стили для загрузки в документ не был задан. &quot; &amp; chr(10) &amp;&quot;Вы можете выбрать новый файл-шаблон. &quot; &amp; chr(10) &amp; &quot;Если файл-шаблон не будет выбран, то загрузка стилей из шаблона при чистке не будет выполняться.&quot; getRussian = &quot;Файл-шаблон, содержащий стили для загрузки в документ не был задан. &quot; &amp; chr(10) &amp;&quot;Вы можете выбрать новый файл-шаблон. &quot; &amp; chr(10) &amp; &quot;Если файл-шаблон не будет выбран, то данный этап чистки будет пропущен.&quot;
Exit Function Exit Function
Case &quot;startQuietCleaningDescription1&quot; Case &quot;startQuietCleaningDescription&quot;
getRussian = &quot;Вы хотите запустить чистку документа? &quot; &amp; chr(10) &amp; &quot;Вы можете также указать новый файл-шаблон.&quot; &amp; chr(10) &amp; &quot;Стили из шаблона &quot; getRussian = &quot;Вы хотите запустить чистку документа? &quot; &amp; chr(10) &amp; &quot;Здесь Вы можете также указать новый файл-шаблон.&quot; &amp; chr(10) &amp; &quot;Стили из шаблона будут загружены в документ.&quot;
Exit Function
Case &quot;startQuietCleaningDescription2&quot;
getRussian = &quot;будут загружены в документ.&quot;
Exit Function Exit Function
Case &quot;buttonYes&quot; Case &quot;buttonYes&quot;
getRussian = &quot;Да&quot; getRussian = &quot;Да&quot;
@ -42,7 +39,7 @@ Function getRussian(identifier As String) As String
getRussian = &quot;Подтверждение запуска чистки&quot; getRussian = &quot;Подтверждение запуска чистки&quot;
Exit Function Exit Function
Case &quot;noStylesFileDialogTitle&quot; Case &quot;noStylesFileDialogTitle&quot;
getRussian = &quot;Выбор файла со стилями&quot; getRussian = &quot;Файл со стилями не найден&quot;
Exit Function Exit Function
Case &quot;buttonTemplateNotFoundSkip&quot; Case &quot;buttonTemplateNotFoundSkip&quot;
getRussian = &quot;Продолжить&quot; getRussian = &quot;Продолжить&quot;
@ -51,7 +48,7 @@ Function getRussian(identifier As String) As String
getRussian = &quot;Нет&quot; getRussian = &quot;Нет&quot;
Exit Function Exit Function
Case &quot;buttonLoad&quot; Case &quot;buttonLoad&quot;
getRussian = &quot;Выбрать шаблон&quot; getRussian = &quot;Указать шаблон&quot;
Exit Function Exit Function
Case &quot;buttonNameToSelectFileWithStyles&quot; Case &quot;buttonNameToSelectFileWithStyles&quot;
getRussian = &quot;Указать файл&quot; getRussian = &quot;Указать файл&quot;
@ -111,7 +108,7 @@ Function getRussian(identifier As String) As String
getRussian = &quot;Конвертировать символы в целевые свободные шрифты&quot; getRussian = &quot;Конвертировать символы в целевые свободные шрифты&quot;
Exit Function Exit Function
Case &quot;advancedMenuReplaceFontsInStyles&quot; Case &quot;advancedMenuReplaceFontsInStyles&quot;
getRussian = &quot;Заменить шрифты в стилях&quot; getRussian = &quot;Заменить шрифты стилях&quot;
Exit Function Exit Function
Case &quot;statusStarted&quot; Case &quot;statusStarted&quot;
getRussian = &quot;Чистка документа начата, подождите&quot; getRussian = &quot;Чистка документа начата, подождите&quot;
@ -162,7 +159,7 @@ Function getRussian(identifier As String) As String
getRussian = &quot;Перед публикацией документа следует исправить все найденные замечания.&quot; getRussian = &quot;Перед публикацией документа следует исправить все найденные замечания.&quot;
Exit Function Exit Function
Case &quot;validationBadSymbolsNotification&quot; Case &quot;validationBadSymbolsNotification&quot;
getRussian = &quot;В тексте обнаружены не подходящие для публикации символы.&quot; &amp; chr(10) &amp; &quot; Нажимая на стрелки навигатора вы сможете перемещаться между найденными отрывками с неподходящими символами.&quot; getRussian = &quot;В тексте обнаружены неподходящие для публикции символы.&quot; &amp; chr(10) &amp; &quot; Далее будет представлен список отрывков текста с подобными символами.&quot;
Exit Function Exit Function
Case &quot;validationBadDrawings&quot; Case &quot;validationBadDrawings&quot;
getRussian = &quot;В документе найдены рисунки (&quot; getRussian = &quot;В документе найдены рисунки (&quot;
@ -209,147 +206,6 @@ Function getRussian(identifier As String) As String
Case &quot;documentIsReadOnly&quot; Case &quot;documentIsReadOnly&quot;
getRussian = &quot;Документ открыт только для чтения. Запуск чистки в данном режиме невозможен.&quot; getRussian = &quot;Документ открыт только для чтения. Запуск чистки в данном режиме невозможен.&quot;
Exit Function Exit Function
Case &quot;validateEndnotes1&quot;
getRussian = &quot;в концевой сноске (абсолютный номер)&quot;
Exit Function
Case &quot;setOutlineLevel&quot;
getRussian = &quot;задан уровень структуры документа&quot;
Exit Function
Case &quot;section&quot;
getRussian = &quot;Раздел&quot;
Exit Function
Case &quot;isInTable&quot;
getRussian = &quot;находится внутри таблицы&quot;
Exit Function
Case &quot;foundHeadingIn&quot;
getRussian = &quot;Найден заголовок в&quot;
Exit Function
Case &quot;inHeader&quot;
getRussian = &quot;верхнем колонтитуле&quot;
Exit Function
Case &quot;inFooter&quot;
getRussian = &quot;нижнем колонтитуле&quot;
Exit Function
Case &quot;inPageStyle&quot;
getRussian = &quot;стиля страниц&quot;
Exit Function
Case &quot;table&quot;
getRussian = &quot;таблице&quot;
Exit Function
Case &quot;validationStarted&quot;
getRussian = &quot;Осуществляется проверка&quot;
Exit Function
Case &quot;chooseFontNameDialogTitle&quot;
getRussian = &quot;Выбор шрифта для создания отчёта.&quot;
Exit Function
Case &quot;chooseFontNameDialogDescription&quot;
getRussian = &quot;Дважды кликните левой клавишей мыши на имя шрифта&quot;
Exit Function
Case &quot;fontReportInProgress&quot;
getRussian = &quot;Составление отчёта о шрифте. Пожалуйста, подождите.&quot;
Exit Function
Case &quot;symbolsInFontHeading&quot;
getRussian = &quot;Символы в шрифте&quot;
Exit Function
Case &quot;symbolsInFontNotFound1&quot;
getRussian = &quot;Символов в шрифте&quot;
Exit Function
Case &quot;symbolsInFontNotFound2&quot;
getRussian = &quot;найдено не было.&quot;
Exit Function
Case &quot;charFirstPage&quot;
getRussian = &quot;Найден на стр.&quot;
Exit Function
Case &quot;statusRemoveAllFields&quot;
getRussian = &quot;Удаляются все поля данных&quot;
Exit Function
Case &quot;advancedMenuRemoveAllFields&quot;
getRussian = &quot;Удалить все поля данных&quot;
Exit Function
Case &quot;advancedMenuFixDOI&quot;
getRussian = &quot;Исправить DOI&quot;
Exit Function
Case &quot;statusFixingDOI&quot;
getRussian = &quot;Исправляем DOI&quot;
Exit Function
Case &quot;advancedMenuResetChapterNumberingRules&quot;
getRussian = &quot;Сбросить настройки нумерации глав&quot;
Exit Function
Case &quot;dialogConfigMaxSuperscript&quot;
getRussian = &quot;Макс. длина текста в верхнем индексе&quot;
Exit Function
Case &quot;dialogConfigMaxSubscript&quot;
getRussian = &quot;Макс. длина текста в нижнем индексе&quot;
Exit Function
Case &quot;replaceNumHyphen&quot;
getRussian = &quot;Заменить тире между цифрами на цифровые&quot;
Exit Function
Case &quot;replaceNumHyphenStatus&quot;
getRussian = &quot;Заменяются тире между цифрами на цифровые&quot;
Exit Function
Case &quot;advancedMenuconvertFontsToCharStyles&quot;
getRussian = &quot;Создать стили символов из найденных шрифтов&quot;
Exit Function
Case &quot;buttonClose&quot;
getRussian = &quot;Закрыть&quot;
Exit Function
Case &quot;navigatorFound&quot;
getRussian = &quot;Всего найдено: &quot;
Exit Function
Case &quot;coloredTextDescription&quot;
getRussian = &quot;Навигация по выделенному цветом тексту&quot;
Exit Function
Case &quot;foundColoredTextMessage&quot;
getRussian = &quot;Найден текст c непрозрачным фоном. Обычно это не подходит для электронных публикаций. Вместо белого цвета фона используйте «Без заливки»&quot;
Exit Function
Case &quot;invalidParagraphFormattingFound&quot;
getRussian = &quot;Найдены некорректные настройки форматирования параграфов. Необходима чистка.&quot;
Exit Function
Case &quot;fixBrokenCharBackTransparentMenuItem&quot;
getRussian = &quot;Исправить некорректные настройки цветовой заливки абзацев&quot;
Exit Function
Case &quot;badSymbols&quot;
getRussian = &quot;Неподходящие для публикации символы&quot;
Exit Function
Case &quot;badNoteSings&quot;
getRussian = &quot;Неподходящие для публикации символы сносок&quot;
Exit Function
Case &quot;validationBadFootnotesSymbolsNotification&quot;
getRussian = &quot;В символах сносок обнаружены не подходящие для публикации символы.&quot; &amp; chr(10) &amp; &quot; Нажимая на стрелки навигатора вы сможете перемещаться между найденными символами сносок.&quot;
Exit Function
Case &quot;badSectionsInTables&quot;
getRussian = &quot;Разделы, которые не должны находится внутри таблиц&quot;
Exit Function
Case &quot;badHeadingsInFootnotes&quot;
getRussian = &quot;Заголовки, которые не должны находиться в сносках&quot;
Exit Function
Case &quot;badHeadingsInTables&quot;
getRussian = &quot;Заголовки, которые нельзя размещать внутри таблиц&quot;
Exit Function
Case &quot;removeNotTransparentBackgrounds&quot;
getRussian = &quot;Удалить непрозрачные фоны в тексте&quot;
Exit Function
Case &quot;manualStyleFileSet&quot;
getRussian = &quot;При чистке будет использоваться указанный вручную шаблон&quot;
Exit Function
Case &quot;predefiendTemplateSelected&quot;
getRussian = &quot;При чистке будет использоваться выбранный из списка шаблон&quot;
Exit Function
Case &quot;selectTemplateDialogTitle&quot;
getRussian = &quot;Выберите шаблон из списка&quot;
Exit Function
Case &quot;templateNotSelected&quot;
getRussian = &quot;Шаблон не выбран&quot;
Exit Function
Case &quot;templateChosen&quot;
getRussian = &quot;Выбран шаблон&quot;
Exit Function
Case &quot;statusFixingDiacriticCharactersKerning&quot;
getRussian = &quot;Исправляем комбинирование с диакритическими символами&quot;
Exit Function
Case &quot;fixDiacriticKerning&quot;
getRussian = &quot;Исправить комбинирование с диакритическими символами&quot;
Exit Function
Case Else Case Else
getRussian = &quot;Перевод не найден&quot; getRussian = &quot;Перевод не найден&quot;
End Select End Select
@ -361,11 +217,8 @@ Function getEnglish(identifier As String) As String
Case &quot;noFileWithStylesFound&quot; Case &quot;noFileWithStylesFound&quot;
getEnglish = &quot;Template with styles wasn&apos;t found. You can choose template on your computer.&quot; &amp; chr(10) &amp;&quot; This stage of cleaning will be skipped if no file chosen.&quot; getEnglish = &quot;Template with styles wasn&apos;t found. You can choose template on your computer.&quot; &amp; chr(10) &amp;&quot; This stage of cleaning will be skipped if no file chosen.&quot;
Exit Function Exit Function
Case &quot;startQuietCleaningDescription1&quot; Case &quot;startQuietCleaningDescription&quot;
getEnglish = &quot;Do you want to start document cleaning?&quot; &amp; chr(10) &amp; &quot;You can choose template with styles.&quot; &amp; chr(10) &amp; &quot;Styles from template &quot; getEnglish = &quot;Do you want to start document cleaning?&quot; &amp; chr(10) &amp; &quot;You can choose template with styles.&quot; &amp; chr(10) &amp; &quot;Styles will be loaded in process of cleaning.&quot;
Exit Function
Case &quot;startQuietCleaningDescription2&quot;
getEnglish = &quot;will be loaded in process of cleaning.&quot; &amp; chr(10) &amp; &quot;&quot;
Exit Function Exit Function
Case &quot;buttonYes&quot; Case &quot;buttonYes&quot;
getEnglish = &quot;Ok&quot; getEnglish = &quot;Ok&quot;
@ -374,7 +227,7 @@ Function getEnglish(identifier As String) As String
getEnglish = &quot;Confirmation&quot; getEnglish = &quot;Confirmation&quot;
Exit Function Exit Function
Case &quot;noStylesFileDialogTitle&quot; Case &quot;noStylesFileDialogTitle&quot;
getEnglish = &quot;Configure a style file&quot; getEnglish = &quot;Template file not found&quot;
Exit Function Exit Function
Case &quot;buttonTemplateNotFoundSkip&quot; Case &quot;buttonTemplateNotFoundSkip&quot;
getEnglish = &quot;Proceed&quot; getEnglish = &quot;Proceed&quot;
@ -494,7 +347,7 @@ Function getEnglish(identifier As String) As String
getEnglish = &quot;It is recommended to fix all problems before publication.&quot; getEnglish = &quot;It is recommended to fix all problems before publication.&quot;
Exit Function Exit Function
Case &quot;validationBadSymbolsNotification&quot; Case &quot;validationBadSymbolsNotification&quot;
getEnglish = &quot;Unsuitable symbols were found.&quot; &amp; chr(10) &amp; &quot; By clicking on the arrows of the navigator, you can navigate between the found passages with inappropriate characters. &quot; getEnglish = &quot;Unsuitable symbols were found&quot; &amp; chr(10) &amp; &quot; Now you will get the list with bad symbols.&quot;
Exit Function Exit Function
Case &quot;validationBadDrawings&quot; Case &quot;validationBadDrawings&quot;
getEnglish = &quot;Drawings was found (&quot; getEnglish = &quot;Drawings was found (&quot;
@ -541,147 +394,6 @@ Function getEnglish(identifier As String) As String
Case &quot;documentIsReadOnly&quot; Case &quot;documentIsReadOnly&quot;
getEnglish = &quot;The document is read-only. Cleaning cannot be started in this mode.&quot; getEnglish = &quot;The document is read-only. Cleaning cannot be started in this mode.&quot;
Exit Function Exit Function
Case &quot;validateEndnotes1&quot;
getEnglish = &quot;in endnote (absolute number)&quot;
Exit Function
Case &quot;setOutlineLevel&quot;
getEnglish = &quot;set document structure level&quot;
Exit Function
Case &quot;section&quot;
getEnglish = &quot;Section&quot;
Exit Function
Case &quot;isInTable&quot;
getEnglish = &quot;located inside the table&quot;
Exit Function
Case &quot;foundHeadingIn&quot;
getEnglish = &quot;Found heading in&quot;
Exit Function
Case &quot;inHeader&quot;
getEnglish = &quot;header&quot;
Exit Function
Case &quot;inFooter&quot;
getEnglish = &quot;footer&quot;
Exit Function
Case &quot;inPageStyle&quot;
getEnglish = &quot;of page style&quot;
Exit Function
Case &quot;table&quot;
getEnglish = &quot;table&quot;
Exit Function
Case &quot;validationStarted&quot;
getEnglish = &quot;Validation in progess&quot;
Exit Function
Case &quot;chooseFontNameDialogTitle&quot;
getEnglish = &quot;Select a font to create a report.&quot;
Exit Function
Case &quot;chooseFontNameDialogDescription&quot;
getEnglish = &quot;Double-click the font name with the left mouse button.&quot;
Exit Function
Case &quot;fontReportInProgress&quot;
getEnglish = &quot;Preparing report. Please wait.&quot;
Exit Function
Case &quot;symbolsInFontHeading&quot;
getEnglish = &quot;Characters in font&quot;
Exit Function
Case &quot;symbolsInFontNotFound1&quot;
getEnglish = &quot;No characters in font&quot;
Exit Function
Case &quot;symbolsInFontNotFound2&quot;
getEnglish = &quot;found.&quot;
Exit Function
Case &quot;charFirstPage&quot;
getEnglish = &quot;Found on page&quot;
Exit Function
Case &quot;statusRemoveAllFields&quot;
getEnglish = &quot;Removing all fields&quot;
Exit Function
Case &quot;advancedMenuRemoveAllFields&quot;
getEnglish = &quot;Remove all fields&quot;
Exit Function
Case &quot;advancedMenuFixDOI&quot;
getEnglish = &quot;Fix DOI&quot;
Exit Function
Case &quot;statusFixingDOI&quot;
getEnglish = &quot;Fixing DOI&quot;
Exit Function
Case &quot;advancedMenuResetChapterNumberingRules&quot;
getEnglish = &quot;Reset chapter numbering settings&quot;
Exit Function
Case &quot;dialogConfigMaxSuperscript&quot;
getEnglish = &quot;Max line length in superscript&quot;
Exit Function
Case &quot;dialogConfigMaxSubscript&quot;
getEnglish = &quot;Max line length in subscript&quot;
Exit Function
Case &quot;replaceNumHyphen&quot;
getEnglish = &quot;Replace dashes between numbers with numeric dashes&quot;
Exit Function
Case &quot;replaceNumHyphenStatus&quot;
getEnglish = &quot;Replacing dashes between numbers with numeric dashes&quot;
Exit Function
Case &quot;advancedMenuconvertFontsToCharStyles&quot;
getEnglish = &quot;Create character styles from found fonts &quot;
Exit Function
Case &quot;buttonClose&quot;
getEnglish = &quot;Close&quot;
Exit Function
Case &quot;navigatorFound&quot;
getEnglish = &quot;Total found: &quot;
Exit Function
Case &quot;coloredTextDescription&quot;
getEnglish = &quot;Navigation over highlighted text&quot;
Exit Function
Case &quot;foundColoredTextMessage&quot;
getEnglish = &quot;Found text with an opaque background. This is usually not suitable for electronic publishing. Use „No Fill“ instead of a white background &quot;
Exit Function
Case &quot;invalidParagraphFormattingFound&quot;
getEnglish = &quot;Incorrect paragraph formatting settings found. Cleaning required. &quot;
Exit Function
Case &quot;fixBrokenCharBackTransparentMenuItem&quot;
getEnglish = &quot;Fix incorrect color fill settings for paragraphs &quot;
Exit Function
Case &quot;badSymbols&quot;
getEnglish = &quot;Unsuitable for publishing characters&quot;
Exit Function
Case &quot;badNoteSings&quot;
getEnglish = &quot;Unsuitable for publishing footnote symbols &quot;
Exit Function
Case &quot;validationBadFootnotesSymbolsNotification&quot;
getEnglish = &quot;Unsuitable for publication symbols were found in footnote symbols. &quot;&amp; Chr (10) &amp;&quot; By clicking on the navigator arrows, you can navigate between found footnote symbols. &quot;
Exit Function
Case &quot;badSectionsInTables&quot;
getEnglish = &quot;Sections that shouldn&apos;t be inside tables &quot;
Exit Function
Case &quot;badHeadingsInFootnotes&quot;
getEnglish = &quot;Headings that should not be in footnotes&quot;
Exit Function
Case &quot;badHeadingsInTables&quot;
getEnglish = &quot;Headers that shouldn&apos;t be placed inside tables&quot;
Exit Function
Case &quot;removeNotTransparentBackgrounds&quot;
getEnglish = &quot;Remove not transparent backgrounds in text&quot;
Exit Function
Case &quot;manualStyleFileSet&quot;
getEnglish = &quot;For cleaning will be used manually specified template &quot;
Exit Function
Case &quot;predefiendTemplateSelected&quot;
getEnglish = &quot;For cleaning will be used template selected from the list&quot;
Exit Function
Case &quot;selectTemplateDialogTitle&quot;
getEnglish = &quot;Select a template from the list &quot;
Exit Function
Case &quot;templateNotSelected&quot;
getEnglish = &quot;Template not selected&quot;
Exit Function
Case &quot;templateChosen&quot;
getEnglish = &quot;Selected template&quot;
Exit Function
Case &quot;statusFixingDiacriticCharactersKerning&quot;
getEnglish = &quot;Fixing the combination with diacritics &quot;
Exit Function
Case &quot;fixDiacriticKerning&quot;
getEnglish = &quot;Fix combining with diacritic characters&quot;
Exit Function
Case Else Case Else
getEnglish = &quot;No translation&quot; getEnglish = &quot;No translation&quot;
End Select End Select
@ -692,11 +404,8 @@ Function getCroatian(identifier As String) As String
Case &quot;noFileWithStylesFound&quot; Case &quot;noFileWithStylesFound&quot;
getCroatian = &quot;Datoteka šablona koja sadrži stilove za učitavanje u dokument nije navedena. &quot; &amp; chr(10) &amp;&quot;Možete izabrati novi šablon na računaru. &quot; &amp; chr(10) &amp; &quot;Ako datoteka šablona nije izabrana, ovaj korak čišćenja će se preskočiti.&quot; getCroatian = &quot;Datoteka šablona koja sadrži stilove za učitavanje u dokument nije navedena. &quot; &amp; chr(10) &amp;&quot;Možete izabrati novi šablon na računaru. &quot; &amp; chr(10) &amp; &quot;Ako datoteka šablona nije izabrana, ovaj korak čišćenja će se preskočiti.&quot;
Exit Function Exit Function
Case &quot;startQuietCleaningDescription1&quot; Case &quot;startQuietCleaningDescription&quot;
getCroatian = &quot;Da li želite da počnete sa čišćenjem dokumenta?&quot; &amp; chr(10) &amp; &quot;Ovde možete da odredite i novu datoteku šablona.&quot; &amp; chr(10) &amp; &quot;Stilovi iz šablona &quot; getCroatian = &quot;Da li želite da počnete sa čišćenjem dokumenta?&quot; &amp; chr(10) &amp; &quot;Ovde možete da odredite i novu datoteku šablona.&quot; &amp; chr(10) &amp; &quot;Stilovi iz šablona biće učitani u dokument.&quot;
Exit Function
Case &quot;startQuietCleaningDescription2&quot;
getCroatian = &quot;biće učitani u dokument.&quot;
Exit Function Exit Function
Case &quot;buttonYes&quot; Case &quot;buttonYes&quot;
getCroatian = &quot;Da&quot; getCroatian = &quot;Da&quot;
@ -705,7 +414,7 @@ Function getCroatian(identifier As String) As String
getCroatian = &quot;Potvrda pokretanja čišćenja&quot; getCroatian = &quot;Potvrda pokretanja čišćenja&quot;
Exit Function Exit Function
Case &quot;noStylesFileDialogTitle&quot; Case &quot;noStylesFileDialogTitle&quot;
getCroatian = &quot;Konfigurišite datoteku stila&quot; getCroatian = &quot;Šablon sa stilovima nije pronađen&quot;
Exit Function Exit Function
Case &quot;buttonTemplateNotFoundSkip&quot; Case &quot;buttonTemplateNotFoundSkip&quot;
getCroatian = &quot;Nastavite&quot; getCroatian = &quot;Nastavite&quot;
@ -825,7 +534,7 @@ Function getCroatian(identifier As String) As String
getCroatian = &quot;Svi pronađeni primedbe moraju biti ispravljeni pre objavljivanja dokumenta.&quot; getCroatian = &quot;Svi pronađeni primedbe moraju biti ispravljeni pre objavljivanja dokumenta.&quot;
Exit Function Exit Function
Case &quot;validationBadSymbolsNotification&quot; Case &quot;validationBadSymbolsNotification&quot;
getCroatian = &quot;U tekstu su pronađeni ne prikladni karaktera. &quot; &amp; chr(10) &amp; &quot;Klikom na strelice navigatora možete se kretati između pronađenih odlomaka s neprikladnim znakovima.&quot; getCroatian = &quot;U tekstu su pronađeni ne prikladni karaktera. &quot; &amp; chr(10) &amp; &quot;Sada ćete dobiti lista odlomaka teksta sa sličnim znakovima&quot;
Exit Function Exit Function
Case &quot;validationBadDrawings&quot; Case &quot;validationBadDrawings&quot;
getCroatian = &quot;U dokumentu se nalaze crteži (&quot; getCroatian = &quot;U dokumentu se nalaze crteži (&quot;
@ -872,147 +581,6 @@ Function getCroatian(identifier As String) As String
Case &quot;documentIsReadOnly&quot; Case &quot;documentIsReadOnly&quot;
getCroatian = &quot;Dokument je samo za čitanje. Čišćenje nije moguće pokrenuti u ovom načinu rada.&quot; getCroatian = &quot;Dokument je samo za čitanje. Čišćenje nije moguće pokrenuti u ovom načinu rada.&quot;
Exit Function Exit Function
Case &quot;validateEndnotes1&quot;
getCroatian = &quot;u end fusnoti (apsolutni broj)&quot;
Exit Function
Case &quot;setOutlineLevel&quot;
getCroatian = &quot;zadati uroven strukturni dokument&quot;
Exit Function
Case &quot;section&quot;
getCroatian = &quot;Odjeljak&quot;
Exit Function
Case &quot;isInTable&quot;
getCroatian = &quot;smještene unutar stola&quot;
Exit Function
Case &quot;foundHeadingIn&quot;
getCroatian = &quot;Naslov pronađen u&quot;
Exit Function
Case &quot;inHeader&quot;
getCroatian = &quot;zaglavlje&quot;
Exit Function
Case &quot;inFooter&quot;
getCroatian = &quot;podnožje&quot;
Exit Function
Case &quot;inPageStyle&quot;
getCroatian = &quot;stil stranice&quot;
Exit Function
Case &quot;table&quot;
getCroatian = &quot;stola&quot;
Exit Function
Case &quot;validationStarted&quot;
getCroatian = &quot;Provjera u tijeku&quot;
Exit Function
Case &quot;chooseFontNameDialogTitle&quot;
getCroatian = &quot;Odaberite font za stvaranje izvješća.&quot;
Exit Function
Case &quot;chooseFontNameDialogDescription&quot;
getCroatian = &quot;Dvaput kliknite naziv fonta lijevom tipkom miša.&quot;
Exit Function
Case &quot;fontReportInProgress&quot;
getCroatian = &quot;Izvještavanje o fontu. Molimo pričekajte.&quot;
Exit Function
Case &quot;symbolsInFontHeading&quot;
getCroatian = &quot;Znakovi fonta&quot;
Exit Function
Case &quot;symbolsInFontNotFound1&quot;
getCroatian = &quot;Znakovi fonta&quot;
Exit Function
Case &quot;symbolsInFontNotFound2&quot;
getCroatian = &quot;nije pronađeno&quot;
Exit Function
Case &quot;charFirstPage&quot;
getCroatian = &quot;Pronađeno na stranici&quot;
Exit Function
Case &quot;statusRemoveAllFields&quot;
getCroatian = &quot;Uklanjanje svih polja&quot;
Exit Function
Case &quot;advancedMenuRemoveAllFields&quot;
getCroatian = &quot;Uklonite sva polja&quot;
Exit Function
Case &quot;advancedMenuFixDOI&quot;
getCroatian = &quot;Popravi DOI&quot;
Exit Function
Case &quot;statusFixingDOI&quot;
getCroatian = &quot;Ispravljamo DOI&quot;
Exit Function
Case &quot;advancedMenuResetChapterNumberingRules&quot;
getCroatian = &quot;Resetirajte postavke numeriranja poglavlja&quot;
Exit Function
Case &quot;dialogConfigMaxSuperscript&quot;
getCroatian = &quot;Maksimalna duljina retka u natpisu&quot;
Exit Function
Case &quot;dialogConfigMaxSubscript&quot;
getCroatian = &quot;Maksimalna duljina retka u indeksu&quot;
Exit Function
Case &quot;replaceNumHyphen&quot;
getCroatian = &quot;Zamijenite crtice između brojeva numeričkim crticama&quot;
Exit Function
Case &quot;replaceNumHyphenStatus&quot;
getCroatian = &quot;Zamjena crtica između brojeva numeričkim crticama&quot;
Exit Function
Case &quot;advancedMenuconvertFontsToCharStyles&quot;
getCroatian = &quot;Stvorite stilove znakova iz pronađenih fontova &quot;
Exit Function
Case &quot;buttonClose&quot;
getCroatian = &quot;Zatvoriti &quot;
Exit Function
Case &quot;navigatorFound&quot;
getCroatian = &quot;Ukupno pronađeno: &quot;
Exit Function
Case &quot;coloredTextDescription&quot;
getCroatian = &quot;Navigacija istaknutim tekstom &quot;
Exit Function
Case &quot;foundColoredTextMessage&quot;
getCroatian = &quot;Pronađen tekst s neprozirnom pozadinom. To obično nije prikladno za elektroničko izdavanje. Upotrijebite „Bez popunjavanja“ umjesto bijele pozadine &quot;
Exit Function
Case &quot;invalidParagraphFormattingFound&quot;
getCroatian = &quot;Pronađene su pogrešne postavke oblikovanja odlomaka. Potrebno čišćenje. &quot;
Exit Function
Case &quot;fixBrokenCharBackTransparentMenuItem&quot;
getCroatian = &quot;Ispravite netočne postavke ispunjavanja boja za odlomke &quot;
Exit Function
Case &quot;badSymbols&quot;
getCroatian = &quot;Neprimjerene znakova za objavljivanje&quot;
Exit Function
Case &quot;badNoteSings&quot;
getCroatian = &quot;Neprikladni simboli fusnota &quot;
Exit Function
Case &quot;validationBadFootnotesSymbolsNotification&quot;
getCroatian = &quot;U simbolima fusnota pronađeni su neprikladni za objavljivanje simboli. &quot;&amp; Chr (10) &amp;&quot; Klikom na strelice navigatora možete se kretati između pronađenih simbola fusnota. &quot;
Exit Function
Case &quot;badSectionsInTables&quot;
getCroatian = &quot;Odjeljci koji ne bi trebali biti unutar tablica &quot;
Exit Function
Case &quot;badHeadingsInFootnotes&quot;
getCroatian = &quot;Naslovi koji ne bi trebali biti u fusnotama&quot;
Exit Function
Case &quot;badHeadingsInTables&quot;
getCroatian = &quot;Zaglavlja koja se ne smiju stavljati unutar tablica&quot;
Exit Function
Case &quot;removeNotTransparentBackgrounds&quot;
getCroatian = &quot;Uklonite netransparentne pozadine u tekstu&quot;
Exit Function
Case &quot;manualStyleFileSet&quot;
getCroatian = &quot;Prilikom čišćenja koristit će se ručno naveden predložak&quot;
Exit Function
Case &quot;predefiendTemplateSelected&quot;
getCroatian = &quot;Prilikom čišćenja koristit će se predložak odabran s popisa&quot;
Exit Function
Case &quot;selectTemplateDialogTitle&quot;
getCroatian = &quot;Izaberite obrazac sa liste&quot;
Exit Function
Case &quot;templateNotSelected&quot;
getCroatian = &quot;Šablon nije izabran&quot;
Exit Function
Case &quot;templateChosen&quot;
getCroatian = &quot;Izabrani šablon&quot;
Exit Function
Case &quot;statusFixingDiacriticCharactersKerning&quot;
getCroatian = &quot;Popravljanje kombinacije s dijakritičkim znakovima&quot;
Exit Function
Case &quot;fixDiacriticKerning&quot;
getCroatian = &quot;Ispravite kombiniranje s naglašenim likovima&quot;
Exit Function
Case Else Case Else
getCroatian = &quot;No translation&quot; getCroatian = &quot;No translation&quot;
End Select End Select
@ -1023,11 +591,8 @@ Function getSerbian(identifier As String) As String
Case &quot;noFileWithStylesFound&quot; Case &quot;noFileWithStylesFound&quot;
getSerbian = &quot;Датотека шаблона која садржи стилове за учитавање у документ није наведена.&quot; &amp; chr(10) &amp;&quot;Можете изабрати нови šablon на рачунару. &quot; &amp; chr(10) &amp; &quot;Ако датотека шаблона није изабрана, овај корак чишћења ће се прескочити.&quot; getSerbian = &quot;Датотека шаблона која садржи стилове за учитавање у документ није наведена.&quot; &amp; chr(10) &amp;&quot;Можете изабрати нови šablon на рачунару. &quot; &amp; chr(10) &amp; &quot;Ако датотека шаблона није изабрана, овај корак чишћења ће се прескочити.&quot;
Exit Function Exit Function
Case &quot;startQuietCleaningDescription1&quot; Case &quot;startQuietCleaningDescription&quot;
getSerbian = &quot;Да ли желите да почнете са чишћењем документа?&quot; &amp; chr(10) &amp; &quot;Овде можете да одредите и нову датотеку шаблона.&quot; &amp; chr(10) &amp; &quot;Стилови из шаблона &quot; getSerbian = &quot;Да ли желите да почнете са чишћењем документа?&quot; &amp; chr(10) &amp; &quot;Овде можете да одредите и нову датотеку шаблона.&quot; &amp; chr(10) &amp; &quot;Стилови из шаблона биће учитани у документ.&quot;
Exit Function
Case &quot;startQuietCleaningDescription2&quot;
getSerbian = &quot;биће учитани у документ.&quot;
Exit Function Exit Function
Case &quot;buttonYes&quot; Case &quot;buttonYes&quot;
getSerbian = &quot;Да&quot; getSerbian = &quot;Да&quot;
@ -1036,7 +601,7 @@ Function getSerbian(identifier As String) As String
getSerbian = &quot;Потврда покретања чишћења&quot; getSerbian = &quot;Потврда покретања чишћења&quot;
Exit Function Exit Function
Case &quot;noStylesFileDialogTitle&quot; Case &quot;noStylesFileDialogTitle&quot;
getSerbian = &quot;Конфигуришите датотеку стила&quot; getSerbian = &quot;Šablon са стиловима није пронађен&quot;
Exit Function Exit Function
Case &quot;buttonTemplateNotFoundSkip&quot; Case &quot;buttonTemplateNotFoundSkip&quot;
getSerbian = &quot;Наставите&quot; getSerbian = &quot;Наставите&quot;
@ -1156,7 +721,7 @@ Function getSerbian(identifier As String) As String
getSerbian = &quot;Сви пронађени примедбе морају бити исправљени пре објављивања документа.&quot; getSerbian = &quot;Сви пронађени примедбе морају бити исправљени пре објављивања документа.&quot;
Exit Function Exit Function
Case &quot;validationBadSymbolsNotification&quot; Case &quot;validationBadSymbolsNotification&quot;
getSerbian = &quot;У тексту су пронађени не прикладни карактера. &quot; &amp; chr(10) &amp; &quot;Кликом на стрелице навигатора можете се кретати између пронађених одломака са неприкладним знаковима.&quot; getSerbian = &quot;У тексту су пронађени не прикладни карактера. &quot; &amp; chr(10) &amp; &quot;Сада ћете добити листа одломака текста са сличним знаковима &quot;
Exit Function Exit Function
Case &quot;validationBadDrawings&quot; Case &quot;validationBadDrawings&quot;
getSerbian = &quot;У документу се налазе цртежи (&quot; getSerbian = &quot;У документу се налазе цртежи (&quot;
@ -1203,147 +768,6 @@ Function getSerbian(identifier As String) As String
Case &quot;documentIsReadOnly&quot; Case &quot;documentIsReadOnly&quot;
getSerbian = &quot;Документ је само за читање. Чишћење се не може покренути у овом режиму.&quot; getSerbian = &quot;Документ је само за читање. Чишћење се не може покренути у овом режиму.&quot;
Exit Function Exit Function
Case &quot;validateEndnotes1&quot;
getSerbian = &quot;у end фусноти (апсолутни број)&quot;
Exit Function
Case &quot;setOutlineLevel&quot;
getSerbian = &quot;задатен уровен структури документа&quot;
Exit Function
Case &quot;section&quot;
getSerbian = &quot;Одјељак&quot;
Exit Function
Case &quot;isInTable&quot;
getSerbian = &quot;смештене унутар стола&quot;
Exit Function
Case &quot;foundHeadingIn&quot;
getSerbian = &quot;Наслов пронађен у&quot;
Exit Function
Case &quot;inHeader&quot;
getSerbian = &quot;хеадер&quot;
Exit Function
Case &quot;inFooter&quot;
getSerbian = &quot;фоотер&quot;
Exit Function
Case &quot;inPageStyle&quot;
getSerbian = &quot;стил странице&quot;
Exit Function
Case &quot;table&quot;
getSerbian = &quot;стола&quot;
Exit Function
Case &quot;validationStarted&quot;
getSerbian = &quot;Провера у тијеку&quot;
Exit Function
Case &quot;chooseFontNameDialogTitle&quot;
getSerbian = &quot;Изаберите фонт да бисте направили извештај.&quot;
Exit Function
Case &quot;chooseFontNameDialogDescription&quot;
getSerbian = &quot;Двапут кликните на назив фонта левим дугметом миша.&quot;
Exit Function
Case &quot;fontReportInProgress&quot;
getSerbian = &quot;Припрема извештаја. Сачекајте.&quot;
Exit Function
Case &quot;symbolsInFontHeading&quot;
getSerbian = &quot;Знакови фонта&quot;
Exit Function
Case &quot;symbolsInFontNotFound1&quot;
getSerbian = &quot;Знакови фонта&quot;
Exit Function
Case &quot;symbolsInFontNotFound2&quot;
getSerbian = &quot;није пронађено&quot;
Exit Function
Case &quot;charFirstPage&quot;
getSerbian = &quot;Пронађено на страници&quot;
Exit Function
Case &quot;statusRemoveAllFields&quot;
getSerbian = &quot;Уклањање свих поља&quot;
Exit Function
Case &quot;advancedMenuRemoveAllFields&quot;
getSerbian = &quot;Уклоните сва поља&quot;
Exit Function
Case &quot;advancedMenuFixDOI&quot;
getSerbian = &quot;Поправи DOI&quot;
Exit Function
Case &quot;statusFixingDOI&quot;
getSerbian = &quot;Исправљамо DOI&quot;
Exit Function
Case &quot;advancedMenuResetChapterNumberingRules&quot;
getSerbian = &quot;Ресетујте поставке нумерисања поглавља&quot;
Exit Function
Case &quot;dialogConfigMaxSuperscript&quot;
getSerbian = &quot;Максимална дужина реда у натпису&quot;
Exit Function
Case &quot;dialogConfigMaxSubscript&quot;
getSerbian = &quot;Максимална дужина реда у индексу&quot;
Exit Function
Case &quot;replaceNumHyphen&quot;
getSerbian = &quot;Цртице између бројева замените нумеричким цртицама&quot;
Exit Function
Case &quot;replaceNumHyphenStatus&quot;
getSerbian = &quot;Замена цртица између бројева нумеричким цртицама&quot;
Exit Function
Case &quot;advancedMenuconvertFontsToCharStyles&quot;
getSerbian = &quot;Створите стилове знакова од пронађених фонтова &quot;
Exit Function
Case &quot;buttonClose&quot;
getSerbian = &quot;Затворити&quot;
Exit Function
Case &quot;navigatorFound&quot;
getSerbian = &quot;Укупно пронађено: &quot;
Exit Function
Case &quot;coloredTextDescription&quot;
getSerbian = &quot;Навигација по истакнутом тексту &quot;
Exit Function
Case &quot;foundColoredTextMessage&quot;
getSerbian = &quot;Пронађен је текст са непрозирном позадином. Ово обично није погодно за електронско издавање. Користите „Без попуњавања“ уместо беле позадине &quot;
Exit Function
Case &quot;invalidParagraphFormattingFound&quot;
getSerbian = &quot;Пронађене су нетачне поставке форматирања пасуса. Потребно чишћење. &quot;
Exit Function
Case &quot;fixBrokenCharBackTransparentMenuItem&quot;
getSerbian = &quot;Исправите нетачна подешавања попуњавања боја за пасусе &quot;
Exit Function
Case &quot;badSymbols&quot;
getSerbian = &quot;Неодговарајуће знакова за објављивање&quot;
Exit Function
Case &quot;badNoteSings&quot;
getSerbian = &quot;Неприкладни симболи фуснота &quot;
Exit Function
Case &quot;validationBadFootnotesSymbolsNotification&quot;
getSerbian = &quot;У симболима фуснота пронађени су неприкладни за објављивање симболи. &quot;&amp; chr(10) &amp;&quot; Кликом на стрелице навигатора можете се кретати између пронађених симбола фуснота. &quot;
Exit Function
Case &quot;badSectionsInTables&quot;
getSerbian = &quot;Одељци који не би требало да буду унутар табела&quot;
Exit Function
Case &quot;badHeadingsInFootnotes&quot;
getSerbian = &quot;Наслови који не смеју бити у фуснотама&quot;
Exit Function
Case &quot;badHeadingsInTables&quot;
getSerbian = &quot;Заглавља која не смеју бити смештена унутар табела&quot;
Exit Function
Case &quot;removeNotTransparentBackgrounds&quot;
getSerbian = &quot;Уклоните нетранспарентне позадине у тексту&quot;
Exit Function
Case &quot;manualStyleFileSet&quot;
getSerbian = &quot;Приликом чишћења користиће се ручно наведен шаблон&quot;
Exit Function
Case &quot;predefiendTemplateSelected&quot;
getSerbian = &quot;Приликом чишћења користиће се шаблон изабран са листе&quot;
Exit Function
Case &quot;selectTemplateDialogTitle&quot;
getSerbian = &quot;Изаберите образац са листе&quot;
Exit Function
Case &quot;templateNotSelected&quot;
getSerbian = &quot;Шаблон није изабран&quot;
Exit Function
Case &quot;templateChosen&quot;
getSerbian = &quot;Изабрани шаблон&quot;
Exit Function
Case &quot;statusFixingDiacriticCharactersKerning&quot;
getSerbian = &quot;Ispravljanje kombinacije sa dijakritičkim znacima &quot;
Exit Function
Case &quot;fixDiacriticKerning&quot;
getSerbian = &quot;Ispravite kombiniranje s naglašenim likovima&quot;
Exit Function
Case Else Case Else
getSerbian = &quot;No translation&quot; getSerbian = &quot;No translation&quot;
End Select End Select
@ -1354,11 +778,8 @@ Function getBosnian(identifier As String) As String
Case &quot;noFileWithStylesFound&quot; Case &quot;noFileWithStylesFound&quot;
getBosnian = &quot;Datoteka predloška koja sadrži stilove za učitavanje u dokument nije navedena.&quot; &amp; chr(10) &amp;&quot; Na računaru možete odabrati novi predložak. &quot; &amp; chr(10) &amp;&quot;Ako datoteka predloška nije odabrana, ovaj korak čišćenja će se preskočiti.&quot; getBosnian = &quot;Datoteka predloška koja sadrži stilove za učitavanje u dokument nije navedena.&quot; &amp; chr(10) &amp;&quot; Na računaru možete odabrati novi predložak. &quot; &amp; chr(10) &amp;&quot;Ako datoteka predloška nije odabrana, ovaj korak čišćenja će se preskočiti.&quot;
Exit Function Exit Function
Case &quot;startQuietCleaningDescription1&quot; Case &quot;startQuietCleaningDescription&quot;
getBosnian = &quot;Želite li započeti s čišćenjem dokumenta?&quot; &amp; chr(10) &amp; &quot;Ovdje možete odrediti i novu datoteku predloška.&quot; &amp; chr(10) &amp; &quot;Stilovi iz predloška&quot; getBosnian = &quot;Želite li započeti s čišćenjem dokumenta?&quot; &amp; chr(10) &amp; &quot;Ovdje možete odrediti i novu datoteku predloška.&quot; &amp; chr(10) &amp; &quot;Stilovi iz predloška bit će učitani u dokument.&quot;
Exit Function
Case &quot;startQuietCleaningDescription2&quot;
getBosnian = &quot; bit će učitani u dokument.&quot;
Exit Function Exit Function
Case &quot;buttonYes&quot; Case &quot;buttonYes&quot;
getBosnian = &quot;Da&quot; getBosnian = &quot;Da&quot;
@ -1367,7 +788,7 @@ Function getBosnian(identifier As String) As String
getBosnian = &quot;Potvrda čišćenja&quot; getBosnian = &quot;Potvrda čišćenja&quot;
Exit Function Exit Function
Case &quot;noStylesFileDialogTitle&quot; Case &quot;noStylesFileDialogTitle&quot;
getBosnian = &quot;Konfigurišite datoteku stila&quot; getBosnian = &quot;Datoteka predloška nije pronađena&quot;
Exit Function Exit Function
Case &quot;buttonTemplateNotFoundSkip&quot; Case &quot;buttonTemplateNotFoundSkip&quot;
getBosnian = &quot;Nastavite&quot; getBosnian = &quot;Nastavite&quot;
@ -1487,7 +908,7 @@ Function getBosnian(identifier As String) As String
getBosnian = &quot;Svi pronađeni primedbe moraju biti ispravljeni prije objavljivanja dokumenta.&quot; getBosnian = &quot;Svi pronađeni primedbe moraju biti ispravljeni prije objavljivanja dokumenta.&quot;
Exit Function Exit Function
Case &quot;validationBadSymbolsNotification&quot; Case &quot;validationBadSymbolsNotification&quot;
getBosnian = &quot;U tekstu su pronađeni neprikladni znakovi.&quot; &amp; chr(10) &amp; &quot;Klikom na strelice navigatora možete se kretati između pronađenih odlomaka s neprikladnim znakovima.&quot; getBosnian = &quot;U tekstu su pronađeni neprikladni znakovi.&quot; &amp; chr(10) &amp; &quot;Sada ćete dobiti listu isječaka teksta sa sličnim znakovima&quot;
Exit Function Exit Function
Case &quot;validationBadDrawings&quot; Case &quot;validationBadDrawings&quot;
getBosnian = &quot;Dokument sadrži crteže (&quot; getBosnian = &quot;Dokument sadrži crteže (&quot;
@ -1534,147 +955,6 @@ Function getBosnian(identifier As String) As String
Case &quot;documentIsReadOnly&quot; Case &quot;documentIsReadOnly&quot;
getBosnian = &quot;Dokument je samo za čitanje. Čišćenje nije moguće pokrenuti u ovom načinu rada.&quot; getBosnian = &quot;Dokument je samo za čitanje. Čišćenje nije moguće pokrenuti u ovom načinu rada.&quot;
Exit Function Exit Function
Case &quot;validateEndnotes1&quot;
getBosnian = &quot;u end fusnoti (apsolutni broj)&quot;
Exit Function
Case &quot;setOutlineLevel&quot;
getBosnian = &quot;zadati uroven strukturni dokument&quot;
Exit Function
Case &quot;section&quot;
getBosnian = &quot;Odjeljak&quot;
Exit Function
Case &quot;isInTable&quot;
getBosnian = &quot;smještene unutar stola&quot;
Exit Function
Case &quot;foundHeadingIn&quot;
getBosnian = &quot;Naslov pronađen u&quot;
Exit Function
Case &quot;inHeader&quot;
getBosnian = &quot;zaglavlje&quot;
Exit Function
Case &quot;inFooter&quot;
getBosnian = &quot;podnožje&quot;
Exit Function
Case &quot;inPageStyle&quot;
getBosnian = &quot;stil stranice&quot;
Exit Function
Case &quot;table&quot;
getBosnian = &quot;stola&quot;
Exit Function
Case &quot;validationStarted&quot;
getBosnian = &quot;Provjera u tijeku&quot;
Exit Function
Case &quot;chooseFontNameDialogTitle&quot;
getBosnian = &quot;Odaberite font za stvaranje izvješća.&quot;
Exit Function
Case &quot;chooseFontNameDialogDescription&quot;
getBosnian = &quot;Dvaput kliknite naziv fonta lijevom tipkom miša.&quot;
Exit Function
Case &quot;fontReportInProgress&quot;
getBosnian = &quot;Izvještavanje o fontu. Molimo pričekajte.&quot;
Exit Function
Case &quot;symbolsInFontHeading&quot;
getBosnian = &quot;Znakovi fonta&quot;
Exit Function
Case &quot;symbolsInFontNotFound1&quot;
getBosnian = &quot;Znakovi fonta&quot;
Exit Function
Case &quot;symbolsInFontNotFound2&quot;
getBosnian = &quot;nije pronađeno&quot;
Exit Function
Case &quot;charFirstPage&quot;
getBosnian = &quot;Pronađeno na stranici&quot;
Exit Function
Case &quot;statusRemoveAllFields&quot;
getBosnian = &quot;Uklanjanje svih polja&quot;
Exit Function
Case &quot;advancedMenuRemoveAllFields&quot;
getBosnian = &quot;Uklonite sva polja&quot;
Exit Function
Case &quot;advancedMenuFixDOI&quot;
getBosnian = &quot;Uklonite DOI&quot;
Exit Function
Case &quot;statusFixingDOI&quot;
getBosnian = &quot;Ispravljamo DOI&quot;
Exit Function
Case &quot;advancedMenuResetChapterNumberingRules&quot;
getBosnian = &quot;Resetirajte postavke numeriranja poglavlja&quot;
Exit Function
Case &quot;dialogConfigMaxSuperscript&quot;
getBosnian = &quot;Maksimalna dužina retka u natpisu&quot;
Exit Function
Case &quot;dialogConfigMaxSubscript&quot;
getBosnian = &quot;Maksimalna dužina retka u indeksu&quot;
Exit Function
Case &quot;replaceNumHyphen&quot;
getBosnian = &quot;Zamijenite crtice između brojeva numeričkim crticama&quot;
Exit Function
Case &quot;replaceNumHyphenStatus&quot;
getBosnian = &quot;Zamjena crtica između brojeva numeričkim crticama&quot;
Exit Function
Case &quot;advancedMenuconvertFontsToCharStyles&quot;
getBosnian = &quot;Stvorite stilove znakova iz pronađenih fontova &quot;
Exit Function
Case &quot;buttonClose&quot;
getBosnian = &quot;Zatvoriti &quot;
Exit Function
Case &quot;navigatorFound&quot;
getBosnian = &quot;Ukupno pronađeno: &quot;
Exit Function
Case &quot;coloredTextDescription&quot;
getBosnian = &quot;Navigacija istaknutim tekstom &quot;
Exit Function
Case &quot;foundColoredTextMessage&quot;
getBosnian = &quot;Pronađen tekst s neprozirnom pozadinom. To obično nije prikladno za elektroničko izdavanje. Upotrijebite „Bez popunjavanja“ umjesto bijele pozadine &quot;
Exit Function
Case &quot;invalidParagraphFormattingFound&quot;
getBosnian = &quot;Pronađene su pogrešne postavke oblikovanja odlomaka. Potrebno čišćenje. &quot;
Exit Function
Case &quot;fixBrokenCharBackTransparentMenuItem&quot;
getBosnian = &quot;Ispravite netočne postavke ispunjavanja boja za odlomke &quot;
Exit Function
Case &quot;badSymbols&quot;
getBosnian = &quot;Neprimjerene znakova za objavljivanje&quot;
Exit Function
Case &quot;badNoteSings&quot;
getBosnian = &quot;Neprikladni simboli fusnota &quot;
Exit Function
Case &quot;validationBadFootnotesSymbolsNotification&quot;
getBosnian = &quot;U simbolima fusnota pronađeni su neprikladni za objavljivanje simboli. &quot;&amp; Chr (10) &amp;&quot; Klikom na strelice navigatora možete se kretati između pronađenih simbola fusnota. &quot;
Exit Function
Case &quot;badSectionsInTables&quot;
getBosnian = &quot;Odjeljci koji ne bi trebali biti unutar tablica &quot;
Exit Function
Case &quot;badHeadingsInFootnotes&quot;
getBosnian = &quot;Naslovi koji ne bi trebali biti u fusnotama&quot;
Exit Function
Case &quot;badHeadingsInTables&quot;
getBosnian = &quot;Zaglavlja koja se ne smiju stavljati unutar tablica&quot;
Exit Function
Case &quot;removeNotTransparentBackgrounds&quot;
getBosnian = &quot;Uklonite netransparentne pozadine u tekstu&quot;
Exit Function
Case &quot;manualStyleFileSet&quot;
getBosnian = &quot;Prilikom čišćenja koristit će se ručno naveden predložak&quot;
Exit Function
Case &quot;predefiendTemplateSelected&quot;
getBosnian = &quot;Prilikom čišćenja koristit će se predložak odabran s popisa&quot;
Exit Function
Case &quot;selectTemplateDialogTitle&quot;
getBosnian = &quot;Изаберите образац са листе&quot;
Exit Function
Case &quot;templateNotSelected&quot;
getBosnian = &quot;Šablon nije izabran&quot;
Exit Function
Case &quot;templateChosen&quot;
getBosnian = &quot;Izabrani šablon&quot;
Exit Function
Case &quot;statusFixingDiacriticCharactersKerning&quot;
getBosnian = &quot;Popravljanje kombinacije s dijakritičkim znakovima&quot;
Exit Function
Case &quot;fixDiacriticKerning&quot;
getBosnian = &quot;Ispravite kombiniranje s naglašenim likovima&quot;
Exit Function
Case Else Case Else
getBosnian = &quot;No translation&quot; getBosnian = &quot;No translation&quot;
End Select End Select

File diff suppressed because it is too large Load diff

View file

@ -5,7 +5,4 @@
<library:element library:name="CleaningDialog"/> <library:element library:name="CleaningDialog"/>
<library:element library:name="NoStyleFile"/> <library:element library:name="NoStyleFile"/>
<library:element library:name="StartQuietCleaning"/> <library:element library:name="StartQuietCleaning"/>
<library:element library:name="ChooseFontname"/>
<library:element library:name="Navigator"/>
<library:element library:name="SelectTemplate"/>
</library:library> </library:library>

View file

@ -1,12 +0,0 @@
<?xml version='1.0' encoding='UTF-8'?>
<oor:component-data oor:package="org.openoffice.Office" oor:name="Paths" xmlns:install="http://openoffice.org/2004/installation" xmlns:oor="http://openoffice.org/2001/registry" xmlns:xs="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
<node oor:name="Paths">
<node oor:name="Template" oor:op="fuse">
<node oor:name="InternalPaths">
<node oor:name="%origin%/templates" oor:op="fuse"/>
</node>
</node>
</node>
</oor:component-data>

View file

@ -1,8 +1,6 @@
apply plugin: 'java' def releaseVersion = "0.7.19"
task oxt(type: Zip) { task oxt(type: Zip) {
dependsOn = [ 'setVersion','setVersionInBasicCode' ] dependsOn = [ 'setVersion','setVersionInBasicCode' ]
archiveFileName = 'cleanAndValidate.oxt'
destinationDirectory = file("./")
from './' from './'
include '*' include '*'
include '*/*' include '*/*'
@ -12,20 +10,19 @@ task oxt(type: Zip) {
exclude '.*' exclude '.*'
exclude 'build.gradle' exclude 'build.gradle'
exclude 'translations.ods' exclude 'translations.ods'
exclude 'build'
exclude 'buildPlugins'
exclude 'cleanandvalidate.update.xml' exclude 'cleanandvalidate.update.xml'
exclude 'cleanAndValidate.ox2' exclude 'cleanAndValidate.ox2'
archiveName 'cleanAndValidate.oxt'
} }
task setVersion(){ task setVersion(){
ant.taskdef(name: 'xmltask', classpath: 'buildPlugins/xmltask.jar', classname: 'com.oopsconsultancy.xmltask.ant.XmlTask') ant.taskdef(name: 'xmltask', classpath: 'buildPlugins/xmltask.jar', classname: 'com.oopsconsultancy.xmltask.ant.XmlTask')
ant.xmltask(source: 'description.xml', dest: 'description.xml', report:'true') { ant.xmltask(source: 'description.xml', dest: 'description.xml', report:'true') {
replace(path: "//*[local-name()='version']/@value", withText: "${project.version}") replace(path: "//*[local-name()='version']/@value", withText: "${releaseVersion}")
} }
} }
task setVersionInBasicCode { task setVersionInBasicCode {
ant.replaceregexp(match:'redactionExtensionVersion = &quot;.*&quot;', replace:"redactionExtensionVersion = &quot;${project.version}&quot;", flags:'g', byline:true) { ant.replaceregexp(match:'redactionExtensionVersion = &quot;.*&quot;', replace:"redactionExtensionVersion = &quot;${releaseVersion}&quot;", flags:'g', byline:true) {
fileset(dir: 'Redaction', includes: 'Configuration.xba') fileset(dir: 'Redaction', includes: 'Configuration.xba')
} }
} }

View file

@ -2,9 +2,9 @@
<description xmlns="http://openoffice.org/extensions/update/2006" <description xmlns="http://openoffice.org/extensions/update/2006"
xmlns:xlink="http://www.w3.org/1999/xlink"> xmlns:xlink="http://www.w3.org/1999/xlink">
<identifier value="pro.litvinovg.Redaction"/> <identifier value="pro.litvinovg.Redaction"/>
<version value="0.10.11" /> <version value="0.7.18" />
<update-download> <update-download>
<src xlink:href="https://dev.litvinovg.pro/litvinovg/cleanandvalidate/uploads/330066acb026243a8a0eab002de1a1f3/cleanAndValidate.oxt" /> <src xlink:href="https://dev.litvinovg.pro/litvinovg/cleanandvalidate/uploads/36bba9e9b20bed23a2bde04fbce21577/cleanAndValidate.oxt" />
</update-download> </update-download>
<release-notes> <release-notes>
<src xlink:href="https://dev.litvinovg.pro/litvinovg/cleanandvalidate/-/raw/master/releasenotes.txt" lang="en" /> <src xlink:href="https://dev.litvinovg.pro/litvinovg/cleanandvalidate/-/raw/master/releasenotes.txt" lang="en" />

View file

@ -1,377 +1,37 @@
<?xml version="1.0" encoding="UTF-8" standalone="no"?> <?xml version="1.0" encoding="UTF-8" standalone="no"?>
<description xmlns="http://openoffice.org/extensions/description/2006" xmlns:dep="http://openoffice.org/extensions/description/2006" xmlns:xlink="http://www.w3.org/1999/xlink"> <description xmlns="http://openoffice.org/extensions/description/2006" xmlns:dep="http://openoffice.org/extensions/description/2006" xmlns:xlink="http://www.w3.org/1999/xlink">
<identifier value="pro.litvinovg.Redaction"/> <identifier value="pro.litvinovg.Redaction"/>
<version value="0.7.19"/>
<version value="0.10.11"/>
<platform value="all"/> <platform value="all"/>
<display-name> <display-name>
<name lang="en">Cleaning and validation documents for publishing in html and epub with pagination</name> <name lang="en">Cleaning and validation documents for publishing in html and epub with pagination</name>
<name lang="ru">Чистка и проверка документов для издания в html и epub с сохранением пагинации</name> <name lang="ru">Чистка и проверка документов для издания в html и epub с сохранением пагинации</name>
</display-name> </display-name>
<registration> <registration>
<simple-license accept-by="admin" suppress-if-required="true" suppress-on-update="true"> <simple-license accept-by="admin" suppress-if-required="true" suppress-on-update="true">
<license-text lang="en" xlink:href="license_en.txt"/> <license-text lang="en" xlink:href="license_en.txt"/>
<license-text lang="ru" xlink:href="license_ru.txt"/> <license-text lang="ru" xlink:href="license_ru.txt"/>
</simple-license> </simple-license>
</registration> </registration>
<dependencies> <dependencies>
<OpenOffice.org-minimal-version dep:name="OpenOffice.org, LibreOffice 4.1 or later" value="4.1"/> <OpenOffice.org-minimal-version dep:name="OpenOffice.org, LibreOffice 4.1 or later" value="4.1"/>
</dependencies> </dependencies>
<update-information> <update-information>
<src xlink:href="https://dev.litvinovg.pro/litvinovg/cleanandvalidate/-/raw/master/cleanandvalidate.update.xml"/> <src xlink:href="https://dev.litvinovg.pro/litvinovg/cleanandvalidate/-/raw/master/cleanandvalidate.update.xml"/>
</update-information> </update-information>
<publisher> <publisher>
<name lang="en" xlink:href="mailto:public@litvinovg.pro">Georgy Litvinov</name> <name lang="en" xlink:href="mailto:public@litvinovg.pro">Georgy Litvinov</name>
</publisher> </publisher>
<release-notes> <release-notes>
<src lang="en" xlink:href="releasenotes.txt"/> <src lang="en" xlink:href="releasenotes.txt"/>
</release-notes> </release-notes>
<extension-description> <extension-description>
<src lang="ru" xlink:href="description/description_ru.txt"/> <src lang="ru" xlink:href="description/description_ru.txt"/>
<src lang="en" xlink:href="description/description_en.txt"/> <src lang="en" xlink:href="description/description_en.txt"/>
</extension-description> </extension-description>
<icon> <icon>
<default xlink:href="icons/addon_icon.png"/>
<high-contrast xlink:href="icons/addon_icon.png"/>
<default xlink:href="icons/addon_icon.svg"/>
<high-contrast xlink:href="icons/addon_icon.svg"/>
</icon> </icon>
</description> </description>

View file

@ -1 +0,0 @@
version=0.10.11

BIN
icons/addon_icon.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 14 KiB

View file

@ -1,218 +0,0 @@
<?xml version="1.0" encoding="UTF-8" standalone="no"?>
<!-- Created with Inkscape (http://www.inkscape.org/) -->
<svg
width="67.73333mm"
height="67.73333mm"
viewBox="0 0 67.73333 67.73333"
version="1.1"
id="svg2491"
inkscape:version="1.1 (c68e22c387, 2021-05-23)"
sodipodi:docname="addon_icon.svg"
xmlns:inkscape="http://www.inkscape.org/namespaces/inkscape"
xmlns:sodipodi="http://sodipodi.sourceforge.net/DTD/sodipodi-0.dtd"
xmlns="http://www.w3.org/2000/svg"
xmlns:svg="http://www.w3.org/2000/svg">
<sodipodi:namedview
id="namedview2493"
pagecolor="#ffffff"
bordercolor="#666666"
borderopacity="1.0"
inkscape:pageshadow="2"
inkscape:pageopacity="0.0"
inkscape:pagecheckerboard="0"
inkscape:document-units="mm"
showgrid="false"
inkscape:zoom="1.7097423"
inkscape:cx="46.498235"
inkscape:cy="81.883685"
inkscape:window-width="1920"
inkscape:window-height="992"
inkscape:window-x="0"
inkscape:window-y="25"
inkscape:window-maximized="1"
inkscape:current-layer="layer1"
inkscape:snap-bbox="true" />
<defs
id="defs2488" />
<g
inkscape:label="Layer 1"
inkscape:groupmode="layer"
id="layer1"
transform="translate(-124.58785,-103.92953)">
<rect
inkscape:export-ydpi="96.000008"
inkscape:export-xdpi="96.000008"
style="fill:none;fill-opacity:1;stroke:none;stroke-width:1.256;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1;paint-order:stroke markers fill;stop-color:#000000"
id="rect982-6-3"
width="67.73333"
height="67.73333"
x="124.58785"
y="103.92953" />
<path
id="rect847-2-7"
style="fill:none;stroke:#000000;stroke-width:2.3;stroke-miterlimit:4;stroke-dasharray:none;paint-order:stroke markers fill;stop-color:#000000"
d="m 174.05313,111.06933 h 3.30422 c 1.64718,0 2.97325,1.32607 2.97325,2.97325 v 52.56149 c 0,1.64718 -1.32607,2.97325 -2.97325,2.97325 h -39.79621 c -1.64718,0 -2.97325,-1.32607 -2.97325,-2.97325 v -52.56149 c 0,-1.64718 1.32607,-2.97325 2.97325,-2.97325 h 3.40135"
sodipodi:nodetypes="cssssssssc" />
<path
inkscape:export-ydpi="96.000008"
inkscape:export-xdpi="96.000008"
style="fill:none;fill-opacity:1;fill-rule:evenodd;stroke:#000000;stroke-width:2.15297;stroke-linecap:round;stroke-linejoin:round;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1"
d="m 143.595,108.66362 c 0,0 8.43592,-0.0564 9.54623,-0.0201 0.98089,0.032 -0.31228,-1.88491 0.52045,-2.93611 0.83273,-1.05121 7.02607,-0.84307 7.82409,0.20813 0.79803,1.05121 -0.59786,2.79113 0.83273,2.79113 1.56136,0 9.23834,-0.0144 9.23834,-0.0144 0,0 7.11288,5.6185 4.75349,5.58225 -2.3594,-0.0362 -34.61591,0.12319 -37.35696,0.12319 -2.74106,0 4.64163,-5.73404 4.64163,-5.73404 z"
id="path849-4-4"
inkscape:connector-curvature="0"
sodipodi:nodetypes="cszzsczzc" />
<rect
inkscape:export-ydpi="96.000008"
inkscape:export-xdpi="96.000008"
style="fill:#000000;fill-opacity:1;stroke:#000000;stroke-width:0.955;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1;paint-order:stroke markers fill;stop-color:#000000"
id="rect851-8-3-8-3-8-9"
width="25.510099"
height="1.667425"
x="150.37207"
y="122.91363" />
<rect
inkscape:export-ydpi="96.000008"
inkscape:export-xdpi="96.000008"
y="126.75371"
x="150.33884"
height="1.667425"
width="23.316961"
id="rect851-8-3-8-3-3-30-4"
style="fill:#000000;fill-opacity:1;stroke:#000000;stroke-width:0.91277;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1;paint-order:stroke markers fill;stop-color:#000000" />
<rect
inkscape:export-ydpi="96.000008"
inkscape:export-xdpi="96.000008"
y="134.61259"
x="150.4086"
height="1.667425"
width="23.055033"
id="rect851-8-3-8-3-38-1-2"
style="fill:#000000;fill-opacity:1;stroke:#000000;stroke-width:0.908;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1;paint-order:stroke markers fill;stop-color:#000000" />
<rect
inkscape:export-ydpi="96.000008"
inkscape:export-xdpi="96.000008"
style="fill:#000000;fill-opacity:1;stroke:#000000;stroke-width:0.875376;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1;paint-order:stroke markers fill;stop-color:#000000"
id="rect851-8-3-8-3-3-0-78-9"
width="21.445341"
height="1.667425"
x="150.37537"
y="138.45267" />
<rect
inkscape:export-ydpi="96.000008"
inkscape:export-xdpi="96.000008"
style="fill:#000000;fill-opacity:1;stroke:#000000;stroke-width:0.907172;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1;paint-order:stroke markers fill;stop-color:#000000"
id="rect851-8-3-8-3-38-4-9-3"
width="23.031563"
height="1.667425"
x="150.27731"
y="146.49648" />
<rect
inkscape:export-ydpi="96.000008"
inkscape:export-xdpi="96.000008"
y="158.23125"
x="150.21875"
height="1.667425"
width="20.915848"
id="rect851-8-3-8-3-38-4-6-5-2"
style="fill:#000000;fill-opacity:1;stroke:#000000;stroke-width:0.864499;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1;paint-order:stroke markers fill;stop-color:#000000" />
<rect
inkscape:export-ydpi="96.000008"
inkscape:export-xdpi="96.000008"
style="fill:#000000;fill-opacity:1;stroke:#000000;stroke-width:0.870552;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1;paint-order:stroke markers fill;stop-color:#000000"
id="rect851-8-3-8-3-3-0-7-8-4-4"
width="21.209816"
height="1.667425"
x="150.27002"
y="162.0713" />
<path
inkscape:export-ydpi="96.000008"
inkscape:export-xdpi="96.000008"
sodipodi:nodetypes="ccc"
inkscape:connector-curvature="0"
id="path1299-5"
d="m 138.85426,125.48045 2.40288,3.17924 5.00275,-6.17076"
style="fill:none;fill-opacity:1;fill-rule:evenodd;stroke:#ff0000;stroke-width:2.5;stroke-linecap:round;stroke-linejoin:round;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1" />
<path
inkscape:export-ydpi="96.000008"
inkscape:export-xdpi="96.000008"
id="path1339-4"
fill="#455A64"
d="m 188.68913,118.31403 -5.08071,-2.32201 -14.12346,43.13492 -0.0211,0.0643 5.10355,1.9512 13.24168,-40.44187 0.85059,0.3252 -5.41705,16.5444 0.54964,1.24433 5.71801,-17.46354 c 0.33224,-1.01472 -0.0359,-2.3748 -0.82118,-3.03698 z"
inkscape:connector-curvature="0"
style="fill:#000000;fill-opacity:1;stroke-width:0.937911" />
<polygon
inkscape:export-ydpi="96.000008"
inkscape:export-xdpi="96.000008"
transform="matrix(0.85059099,0.3251984,-0.3009474,0.91913342,148.53775,97.412814)"
id="polygon1341-3"
points="43,52 49,52 46,61 "
fill="#455A64"
style="fill:#000000;fill-opacity:1" />
<polygon
inkscape:export-ydpi="96.000008"
inkscape:export-xdpi="96.000008"
transform="matrix(0.85059099,0.3251984,-0.3009474,0.91913342,148.53775,97.412814)"
id="polygon1343-2"
points="44,52 45,52 46,61 "
fill="#999999" />
<rect
y="150.20065"
x="150.27731"
height="1.667425"
width="23.031563"
id="rect851-8-3-8-3-38-4-9-3-0"
style="fill:#000000;fill-opacity:1;stroke:#000000;stroke-width:0.907172;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1;paint-order:stroke markers fill;stop-color:#000000"
inkscape:export-xdpi="96.000008"
inkscape:export-ydpi="96.000008" />
<polygon
inkscape:export-ydpi="96.000008"
inkscape:export-xdpi="96.000008"
transform="matrix(0.85059099,0.3251984,-0.3009474,0.91913342,148.53775,97.412814)"
id="polygon1345-2"
points="49,52 49,28 49,8 49,5.34 43,4 43,51.93 43,52 "
fill="#ff7043" />
<path
inkscape:export-ydpi="96.000008"
inkscape:export-xdpi="96.000008"
style="fill:none;fill-opacity:1;fill-rule:evenodd;stroke:#ff0000;stroke-width:2.5;stroke-linecap:round;stroke-linejoin:round;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1"
d="m 139.14199,160.1588 2.40288,3.17925 5.00277,-6.17076"
id="path1299-8-4"
inkscape:connector-curvature="0"
sodipodi:nodetypes="ccc" />
<path
inkscape:export-ydpi="96.000008"
inkscape:export-xdpi="96.000008"
sodipodi:nodetypes="ccc"
inkscape:connector-curvature="0"
id="path1299-8-1-1"
d="m 138.93861,136.75912 2.40288,3.17925 5.00277,-6.17077"
style="fill:none;fill-opacity:1;fill-rule:evenodd;stroke:#00a319;stroke-width:2.5;stroke-linecap:round;stroke-linejoin:round;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1" />
<path
inkscape:export-ydpi="96.000008"
inkscape:export-xdpi="96.000008"
style="fill:none;fill-opacity:1;fill-rule:evenodd;stroke:#00a319;stroke-width:2.5;stroke-linecap:round;stroke-linejoin:round;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1"
d="m 139.05033,149.51085 2.40288,3.17925 5.00277,-6.17076"
id="path1299-8-1-9-6"
inkscape:connector-curvature="0"
sodipodi:nodetypes="ccc" />
<polygon
inkscape:export-ydpi="96.000008"
inkscape:export-xdpi="96.000008"
transform="matrix(0.85059099,0.3251984,-0.3009474,0.91913342,148.53775,97.412814)"
id="polygon1347-4"
points="45,52 45,4.447 44,4.223 44,52 "
fill="#ff8a65" />
<rect
inkscape:export-ydpi="96.000008"
inkscape:export-xdpi="96.000008"
transform="matrix(0.93406194,0.35711104,-0.31116989,0.9503543,0,0)"
id="rect1349-7"
y="62.168976"
x="210.8367"
width="5.4638195"
height="0.96714818"
fill="#455A64"
style="fill:#000000;fill-opacity:1;stroke-width:0.938467" />
</g>
</svg>

Before

Width:  |  Height:  |  Size: 9.8 KiB

BIN
icons/clean.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 12 KiB

View file

@ -1,113 +0,0 @@
<?xml version="1.0" encoding="UTF-8" standalone="no"?>
<!-- Created with Inkscape (http://www.inkscape.org/) -->
<svg
width="67.73333mm"
height="67.73333mm"
viewBox="0 0 67.73333 67.73333"
version="1.1"
id="svg2491"
inkscape:version="1.1 (c68e22c387, 2021-05-23)"
sodipodi:docname="clean.svg"
xmlns:inkscape="http://www.inkscape.org/namespaces/inkscape"
xmlns:sodipodi="http://sodipodi.sourceforge.net/DTD/sodipodi-0.dtd"
xmlns="http://www.w3.org/2000/svg"
xmlns:svg="http://www.w3.org/2000/svg">
<sodipodi:namedview
id="namedview2493"
pagecolor="#ffffff"
bordercolor="#666666"
borderopacity="1.0"
inkscape:pageshadow="2"
inkscape:pageopacity="0.0"
inkscape:pagecheckerboard="0"
inkscape:document-units="mm"
showgrid="false"
inkscape:zoom="2.4172662"
inkscape:cx="91.21875"
inkscape:cy="129.07143"
inkscape:window-width="1920"
inkscape:window-height="992"
inkscape:window-x="0"
inkscape:window-y="25"
inkscape:window-maximized="1"
inkscape:current-layer="layer1" />
<defs
id="defs2488" />
<g
inkscape:label="Layer 1"
inkscape:groupmode="layer"
id="layer1"
transform="translate(-120.95491,-106.68899)">
<rect
inkscape:export-ydpi="96.000015"
inkscape:export-xdpi="96.000015"
y="106.68899"
x="120.95491"
height="67.73333"
width="67.73333"
id="rect982-3"
style="fill:none;fill-opacity:1;stroke:none;stroke-width:1.256;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1;paint-order:stroke markers fill;stop-color:#000000" />
<path
id="rect847-0-1-7"
style="fill:none;stroke:#000000;stroke-width:2.5;stroke-miterlimit:4;stroke-dasharray:none;paint-order:stroke markers fill;stop-color:#000000"
d="m 168.8468,113.40557 h 3.593 c 1.60065,0 2.88926,1.28861 2.88926,2.88926 v 29.05344 m -22.83699,24.91257 h -23.15672 c -1.60066,0 -2.88927,-1.28861 -2.88927,-2.88926 v -51.07675 c 0,-1.60065 1.28861,-2.88926 2.88927,-2.88926 h 3.79406"
sodipodi:nodetypes="cssccssssc" />
<rect
y="135.81468"
x="131.28925"
height="5.8349214"
width="38.979149"
id="rect851-8-3-8-3-37-8-1-4-7-8-1-9-2-3-5-7-68"
style="fill:#000000;fill-opacity:1;stroke:none;stroke-width:2.20769;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1;paint-order:stroke markers fill;stop-color:#000000"
inkscape:export-xdpi="96.000015"
inkscape:export-ydpi="96.000015" />
<path
sodipodi:nodetypes="cszzsczzc"
inkscape:connector-curvature="0"
id="path849-6-6-9"
d="m 135.63756,111.55797 c 0,0 9.22154,-0.0555 10.43524,-0.0198 1.07225,0.0315 -0.34135,-1.85587 0.56893,-2.89087 0.91027,-1.03501 7.68039,-0.83008 8.55274,0.20492 0.87235,1.03501 -0.65354,2.74812 0.91028,2.74812 1.70677,0 10.0987,-0.0142 10.0987,-0.0142 0,0 7.77528,5.53192 5.19616,5.49623 -2.57912,-0.0357 -37.83963,0.1213 -40.83596,0.1213 -2.99634,0 5.07391,-5.64568 5.07391,-5.64568 z"
style="fill:none;fill-opacity:1;fill-rule:evenodd;stroke:#000000;stroke-width:2.5;stroke-linecap:butt;stroke-linejoin:miter;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1"
inkscape:export-xdpi="96.000015"
inkscape:export-ydpi="96.000015" />
<rect
inkscape:export-ydpi="96.000015"
inkscape:export-xdpi="96.000015"
style="fill:#000000;fill-opacity:1;stroke:none;stroke-width:2.20769;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1;paint-order:stroke markers fill;stop-color:#000000"
id="rect851-8-3-8-3-37-8-1-4-7-8-1-9-2-3-5-7-6-9"
width="38.979149"
height="5.8349214"
x="131.18256"
y="147.67714" />
<path
id="rect851-8-3-8-3-37-8-1-4-7-8-1-9-2-3-5-7-6-4-7"
style="stroke-width:2.20769;paint-order:stroke markers fill;stop-color:#000000"
d="m 131.14584,159.24664 23.89289,0 -1.22168,5.83492 -22.67121,0 z"
sodipodi:nodetypes="ccccc" />
<rect
inkscape:export-ydpi="96.000015"
inkscape:export-xdpi="96.000015"
style="fill:#000000;fill-opacity:1;stroke:none;stroke-width:2.20769;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1;paint-order:stroke markers fill;stop-color:#000000"
id="rect851-8-3-8-3-37-8-1-4-7-8-1-9-2-3-5-5"
width="38.979149"
height="5.8349214"
x="131.21593"
y="124.478" />
<path
inkscape:export-ydpi="96.000015"
inkscape:export-xdpi="96.000015"
sodipodi:nodetypes="ccccccccccccczcc"
inkscape:connector-curvature="0"
id="path1016-3"
d="m 156.84912,152.8902 c 0,0 -4.64317,17.25076 -4.79965,17.91698 0.22379,1.03041 2.12987,1.1969 3.07746,-0.0513 0.99308,1.70103 2.66154,0.69791 3.02532,0 0.5362,1.22214 2.35102,1.3643 3.02531,0.10249 0.20864,1.33245 1.92993,1.3837 2.86882,0 0.29334,1.4372 2.27544,0.85843 2.50371,-0.0513 1.64759,1.8746 2.72183,0.29919 2.97315,0.15374 0.15648,0.92247 2.13858,1.33245 2.71234,-0.20499 0.76572,1.46441 2.15627,1.27169 2.81667,0.20499 1.4556,1.48105 2.64821,0.56314 2.92099,-0.10249 1.52216,1.64931 2.74807,0.56617 2.86883,-0.20499 0.64839,1.35445 2.56158,1.63022 2.76451,-0.0513 0.15648,0.46123 2.87947,1.96442 2.81666,-0.0512 -0.0628,-2.01568 -4.26345,-17.38961 -4.26345,-17.38961 z"
style="fill:none;fill-opacity:1;fill-rule:evenodd;stroke:#000000;stroke-width:2;stroke-linecap:round;stroke-linejoin:round;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1" />
<path
inkscape:export-ydpi="96.000015"
inkscape:export-xdpi="96.000015"
sodipodi:nodetypes="czzccccccc"
inkscape:connector-curvature="0"
id="path1014-4"
d="m 167.27385,140.09677 c 0,0 -0.11785,-4.0209 -0.0124,-8.12606 0.10542,-4.10517 4.92663,-3.61493 4.7746,0.104 -0.15202,3.71893 -0.0937,7.91956 -0.0937,7.91956 1.94457,0.4322 2.04458,2.83951 2.85658,5.80684 4.0456,1.51275 6.03838,2.73984 7.21754,7.17762 l -25.00864,-0.10637 c 1.11511,-2.50829 1.69674,-5.41689 7.35684,-7.16064 0.52807,-1.53828 0.50796,-5.49057 2.90923,-5.61495 z"
style="fill:#ff0000;fill-opacity:1;fill-rule:evenodd;stroke:#000000;stroke-width:2;stroke-linecap:round;stroke-linejoin:round;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1" />
</g>
</svg>

Before

Width:  |  Height:  |  Size: 6.2 KiB

View file

@ -1,101 +0,0 @@
<?xml version="1.0" encoding="UTF-8" standalone="no"?>
<!-- Created with Inkscape (http://www.inkscape.org/) -->
<svg
width="67.73333mm"
height="67.73333mm"
viewBox="0 0 67.73333 67.73333"
version="1.1"
id="svg2491"
inkscape:version="1.1 (c68e22c387, 2021-05-23)"
sodipodi:docname="report.svg"
xmlns:inkscape="http://www.inkscape.org/namespaces/inkscape"
xmlns:sodipodi="http://sodipodi.sourceforge.net/DTD/sodipodi-0.dtd"
xmlns="http://www.w3.org/2000/svg"
xmlns:svg="http://www.w3.org/2000/svg">
<sodipodi:namedview
id="namedview2493"
pagecolor="#ffffff"
bordercolor="#666666"
borderopacity="1.0"
inkscape:pageshadow="2"
inkscape:pageopacity="0.0"
inkscape:pagecheckerboard="0"
inkscape:document-units="mm"
showgrid="false"
inkscape:zoom="1.436055"
inkscape:cx="80.428674"
inkscape:cy="68.242512"
inkscape:window-width="1920"
inkscape:window-height="992"
inkscape:window-x="0"
inkscape:window-y="25"
inkscape:window-maximized="1"
inkscape:current-layer="layer1" />
<defs
id="defs2488" />
<g
inkscape:label="Layer 1"
inkscape:groupmode="layer"
id="layer1"
transform="translate(-120.95491,-106.68899)">
<rect
inkscape:export-ydpi="96.000015"
inkscape:export-xdpi="96.000015"
y="106.68899"
x="120.95491"
height="67.73333"
width="67.73333"
id="rect982-3"
style="fill:none;fill-opacity:1;stroke:none;stroke-width:1.256;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1;paint-order:stroke markers fill;stop-color:#000000" />
<path
id="rect847-0-1-3"
style="fill:none;stroke:#000000;stroke-width:2.48942;stroke-miterlimit:4;stroke-dasharray:none;paint-order:stroke markers fill;stop-color:#000000"
d="m 173.02817,114.19 h 3.71042 c 1.63134,0 2.94465,1.30222 2.94465,2.91977 v 51.61604 c 0,1.61756 -1.31331,2.91977 -2.94465,2.91977 h -42.99368 c -1.63133,0 -2.94465,-1.30221 -2.94465,-2.91977 v -51.61604 c 0,-1.61755 1.31332,-2.91977 2.94465,-2.91977 h 3.25326"
sodipodi:nodetypes="cssssssssc" />
<rect
y="136.53908"
x="135.34975"
height="5.9467759"
width="39.835781"
id="rect851-8-3-8-3-37-8-1-4-7-8-1-9-2-3-5-7-8"
style="fill:#000000;fill-opacity:1;stroke:none;stroke-width:2.25311;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1;paint-order:stroke markers fill;stop-color:#000000"
inkscape:export-xdpi="95.562637"
inkscape:export-ydpi="95.562637" />
<path
sodipodi:nodetypes="cszzsczzc"
inkscape:connector-curvature="0"
id="path849-6-6-5"
d="m 139.99174,112.01511 c 0,0 9.22154,-0.0566 10.43524,-0.0202 1.07225,0.0321 -0.34135,-1.89145 0.56892,-2.9463 0.91028,-1.05484 7.6804,-0.84598 8.55275,0.20886 0.87235,1.05485 -0.65354,2.8008 0.91028,2.8008 1.70677,0 10.09869,-0.0145 10.09869,-0.0145 0,0 7.77529,5.63796 5.19617,5.60158 -2.57912,-0.0364 -37.83963,0.12362 -40.83596,0.12362 -2.99633,0 5.07391,-5.7539 5.07391,-5.7539 z"
style="fill:none;fill-opacity:1;fill-rule:evenodd;stroke:#000000;stroke-width:2.5;stroke-linecap:round;stroke-linejoin:round;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1"
inkscape:export-xdpi="95.562637"
inkscape:export-ydpi="95.562637" />
<rect
inkscape:export-ydpi="95.562637"
inkscape:export-xdpi="95.562637"
style="fill:#000000;fill-opacity:1;stroke:none;stroke-width:2.25311;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1;paint-order:stroke markers fill;stop-color:#000000"
id="rect851-8-3-8-3-37-8-1-4-7-8-1-9-2-3-5-7-6-2"
width="39.835781"
height="5.9467759"
x="135.24069"
y="148.62894" />
<rect
y="160.42023"
x="135.2032"
height="5.9467759"
width="39.835781"
id="rect851-8-3-8-3-37-8-1-4-7-8-1-9-2-3-5-7-6-4-22"
style="fill:#000000;fill-opacity:1;stroke:none;stroke-width:2.25311;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1;paint-order:stroke markers fill;stop-color:#000000"
inkscape:export-xdpi="95.562637"
inkscape:export-ydpi="95.562637" />
<rect
inkscape:export-ydpi="95.562637"
inkscape:export-xdpi="95.562637"
style="fill:#000000;fill-opacity:1;stroke:none;stroke-width:2.25311;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1;paint-order:stroke markers fill;stop-color:#000000"
id="rect851-8-3-8-3-37-8-1-4-7-8-1-9-2-3-5-70"
width="39.835785"
height="5.9467759"
x="135.27483"
y="124.98509" />
</g>
</svg>

Before

Width:  |  Height:  |  Size: 4.5 KiB

BIN
icons/validate.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 8.1 KiB

View file

@ -1,125 +0,0 @@
<?xml version="1.0" encoding="UTF-8" standalone="no"?>
<!-- Created with Inkscape (http://www.inkscape.org/) -->
<svg
width="67.73333mm"
height="67.73333mm"
viewBox="0 0 67.73333 67.73333"
version="1.1"
id="svg2491"
inkscape:version="1.1 (c68e22c387, 2021-05-23)"
sodipodi:docname="validate.svg"
xmlns:inkscape="http://www.inkscape.org/namespaces/inkscape"
xmlns:sodipodi="http://sodipodi.sourceforge.net/DTD/sodipodi-0.dtd"
xmlns="http://www.w3.org/2000/svg"
xmlns:svg="http://www.w3.org/2000/svg">
<sodipodi:namedview
id="namedview2493"
pagecolor="#ffffff"
bordercolor="#666666"
borderopacity="1.0"
inkscape:pageshadow="2"
inkscape:pageopacity="0.0"
inkscape:pagecheckerboard="0"
inkscape:document-units="mm"
showgrid="false"
inkscape:zoom="0.7180275"
inkscape:cx="244.41961"
inkscape:cy="206.12024"
inkscape:window-width="1920"
inkscape:window-height="992"
inkscape:window-x="0"
inkscape:window-y="25"
inkscape:window-maximized="1"
inkscape:current-layer="layer1" />
<defs
id="defs2488" />
<g
inkscape:label="Layer 1"
inkscape:groupmode="layer"
id="layer1"
transform="translate(-124.61893,-103.22372)">
<rect
inkscape:export-ydpi="96.000015"
inkscape:export-xdpi="96.000015"
style="fill:none;fill-opacity:1;stroke:none;stroke-width:1.256;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1;paint-order:stroke markers fill;stop-color:#000000"
id="rect982-9-8"
width="67.73333"
height="67.73333"
x="124.61893"
y="103.22372" />
<path
id="rect847-0-1"
style="fill:none;stroke:#000000;stroke-width:2.5;paint-order:stroke markers fill;stop-color:#000000"
d="m 169.66551,109.92162 h 4.14995 c 1.63133,0 2.94465,1.31332 2.94465,2.94465 v 52.05588 c 0,1.63133 -1.31332,2.94465 -2.94465,2.94465 h -42.99368 c -1.63134,0 -2.94465,-1.31332 -2.94465,-2.94465 v -52.05588 c 0,-1.63133 1.31331,-2.94465 2.94465,-2.94465 h 4.52474"
sodipodi:nodetypes="cssssssssc" />
<rect
inkscape:export-ydpi="96.000015"
inkscape:export-xdpi="96.000015"
style="fill:#000000;fill-opacity:1;stroke:none;stroke-width:2.23676;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1;paint-order:stroke markers fill;stop-color:#000000"
id="rect851-8-3-8-3-37-8-1-4-7-8-1-9-2-3-5-7"
width="39.25959"
height="5.9467759"
x="133.00279"
y="132.7603" />
<path
inkscape:export-ydpi="96.000015"
inkscape:export-xdpi="96.000015"
style="fill:none;fill-opacity:1;fill-rule:evenodd;stroke:#000000;stroke-width:2.5;stroke-linecap:butt;stroke-linejoin:miter;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1"
d="m 137.06861,108.33894 c 0,0 9.22153,-0.0566 10.43524,-0.0202 1.07224,0.0321 -0.34136,-1.89145 0.56892,-2.94629 0.91028,-1.05485 7.6804,-0.84599 8.55275,0.20886 0.87235,1.05484 -0.65354,2.80079 0.91028,2.80079 1.70677,0 10.09869,-0.0145 10.09869,-0.0145 0,0 7.77529,5.63797 5.19617,5.60159 -2.57912,-0.0364 -37.83964,0.12363 -40.83597,0.12363 -2.99633,-1e-5 5.07392,-5.75391 5.07392,-5.75391 z"
id="path849-6-6"
inkscape:connector-curvature="0"
sodipodi:nodetypes="cszzsczzc" />
<rect
y="144.85016"
x="132.89534"
height="5.9467759"
width="39.25959"
id="rect851-8-3-8-3-37-8-1-4-7-8-1-9-2-3-5-7-6"
style="fill:#000000;fill-opacity:1;stroke:none;stroke-width:2.23676;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1;paint-order:stroke markers fill;stop-color:#000000"
inkscape:export-xdpi="96.000015"
inkscape:export-ydpi="96.000015" />
<rect
inkscape:export-ydpi="96.000015"
inkscape:export-xdpi="96.000015"
style="fill:#000000;fill-opacity:1;stroke:none;stroke-width:2.23676;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1;paint-order:stroke markers fill;stop-color:#000000"
id="rect851-8-3-8-3-37-8-1-4-7-8-1-9-2-3-5-7-6-4"
width="39.25959"
height="5.9467759"
x="132.85837"
y="156.64145" />
<rect
y="121.20631"
x="132.92896"
height="5.9467759"
width="39.259594"
id="rect851-8-3-8-3-37-8-1-4-7-8-1-9-2-3-5"
style="fill:#000000;fill-opacity:1;stroke:none;stroke-width:2.23676;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1;paint-order:stroke markers fill;stop-color:#000000"
inkscape:export-xdpi="96.000015"
inkscape:export-ydpi="96.000015" />
<path
id="rect1186-4"
style="fill:#ffffff;fill-opacity:1;stroke:none;stroke-width:0.889025;stroke-linecap:round;stroke-linejoin:round;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1;paint-order:stroke markers fill;stop-color:#000000"
d="m 160.26757,134.88947 h 22.27055 c 3.42763,0 6.18706,2.54612 6.18706,5.70879 v 20.67999 c 0,3.16267 0.40717,5.62643 -4.07613,5.63922 l -24.38148,0.0696 c -3.42761,0.01 -6.18705,-2.54612 -6.18705,-5.70879 V 140.5983 c 0,-3.16267 2.75943,-5.70879 6.18705,-5.70879 z"
inkscape:connector-curvature="0"
sodipodi:nodetypes="sssssssss"
inkscape:export-xdpi="96.000015"
inkscape:export-ydpi="96.000015" />
<path
inkscape:export-ydpi="96.000015"
inkscape:export-xdpi="96.000015"
sodipodi:nodetypes="cssssssc"
id="path1170-7"
d="m 188.50413,149.14281 v 14.92431 c 0,2.08279 -1.68738,3.77123 -3.76888,3.77123 h -26.38209 c -2.08149,0 -3.76887,-1.68844 -3.76887,-3.77123 v -26.39859 c 0,-2.08279 1.68738,-3.77122 3.76887,-3.77122 h 23.60203"
inkscape:connector-curvature="0"
style="fill:none;stroke:#000000;stroke-width:2.68422;stroke-linecap:round;stroke-linejoin:miter;stroke-miterlimit:4;stroke-dasharray:none" />
<path
id="polyline1168-0"
style="fill:none;stroke:#099c00;stroke-width:7.24438;stroke-linecap:square;stroke-linejoin:miter;stroke-miterlimit:4;stroke-dasharray:none;stroke-opacity:1"
d="m 162.58302,150.28058 8.58283,7.04191 15.43985,-17.93997"
inkscape:connector-curvature="0"
sodipodi:nodetypes="ccc"
inkscape:export-xdpi="96.000015"
inkscape:export-ydpi="96.000015" />
</g>
</svg>

Before

Width:  |  Height:  |  Size: 6.1 KiB

File diff suppressed because it is too large Load diff

Before

Width:  |  Height:  |  Size: 64 KiB

File diff suppressed because it is too large Load diff

Before

Width:  |  Height:  |  Size: 64 KiB

View file

@ -1,6 +1,8 @@
The author of this extension is: The author of this extension is:
Georgy Litvinov (public@litvinovg.pro) Georgy Litvinov (public@litvinovg.pro)
Copyright 2021 redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation, version 3 of the License. Copyright 2019.
This library is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation, version 3 of the License.
This library is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. This library is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details.

View file

@ -1,6 +1,6 @@
Автор расширения: Автор расширения:
Георгий Литвинов (public@litvinovg.pro) Георгий Литвинов (public@litvinovg.pro)
Copyright 2021. Copyright 2019.
Это расширение является свободным программным обеспечением, вы можете распространять и/или модифицировать его в соответствии с лицензией GNU Lesser General Public License версии 3.0, опубликованной Free Software Foundation. Это расширение является свободным программным обеспечением, вы можете распространять и/или модифицировать его в соответствии с лицензией GNU Lesser General Public License версии 3.0, опубликованной Free Software Foundation.

View file

@ -1,14 +1,3 @@
0.9.36 Added option to remove all colored text backgrounds in expert mode
0.9.35 Validation reports improved
0.9.21 Added option to reset chapters numbering. Enabled by default.
0.9.5 "Remove fields" option added to advanced mode
0.9.4 Added check for grouped draw elements in font report function
0.9.3 Fix for font report function
0.9.2 Font report in Draw added
0.8.6 Validation status indicator added
0.8.4 Added check for headings in footers and headers
0.8.3 Added check for sections in tables
0.7.19 Do not try to clean in read only mode
0.7.16 Added timestamp to document properties after cleaning 0.7.16 Added timestamp to document properties after cleaning
0.7.14 Search for formatting in styles 0.7.14 Search for formatting in styles
0.7.13 Added conversion to doc and back to odt to filter broken default paragraph style settings 0.7.13 Added conversion to doc and back to odt to filter broken default paragraph style settings

Binary file not shown.

View file

@ -1,4 +0,0 @@
<?xml version="1.0" encoding="UTF-8"?>
<groupuinames:template-group-list xmlns:groupuinames="http://openoffice.org/2006/groupuinames">
<groupuinames:template-group groupuinames:name="articles" groupuinames:default-ui-name="Articles" />
</groupuinames:template-group-list>

Binary file not shown.