This commit is contained in:
George Litvinov 2019-10-21 13:25:47 +03:00
parent ad7febac11
commit f810750b0c
3 changed files with 11 additions and 7 deletions

View file

@ -1,6 +1,6 @@
<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE script:module PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "module.dtd">
<script:module xmlns:script="http://openoffice.org/2000/script" script:name="Validation" script:language="StarBasic">Sub markZZZ
<script:module xmlns:script="http://openoffice.org/2000/script" script:name="Validation" script:language="StarBasic">Sub markZZZX
End Sub
@ -89,6 +89,9 @@ Private Function checkGraphics
drawingN = drawingN + 1
EndIf
If InStr(shapeType,&quot;FrameShape&quot;) = 1 Then
&apos; Globalscope.BasicLibraries.LoadLibrary( &quot;MRILib&quot; )
&apos; MRI draw
If draw.supportsService(&quot;com.sun.star.text.TextEmbeddedObject&quot;) Then
embeededObject = draw.getEmbeddedObject()
If Not embeededObject.supportsService(&quot;com.sun.star.formula.FormulaProperties&quot;) Then
badFrame = badFrame + 1
@ -96,6 +99,7 @@ Private Function checkGraphics
&apos;Formula
EndIf
EndIf
EndIf
Next i
If drawingN &lt;&gt; 0 Then
result = result &amp;&quot;В документе найдены рисунки (&quot; &amp; drawingN &amp; &quot;), неподходящие для публикации.&quot; &amp; chr(10)

View file

@ -3,7 +3,7 @@
xmlns:dep="http://openoffice.org/extensions/description/2006"
xmlns:xlink="http://www.w3.org/1999/xlink">
<identifier value="pro.litvinovg.Redaction" />
<version value="0.2.1" />
<version value="0.2.2" />
<platform value="all" />
<display-name>
<name lang="en">Redaction for publishing in Institute of philosophy</name>

Binary file not shown.