Added check for bad characters in DOI
This commit is contained in:
parent
84dfebf3f6
commit
b5e319b5b3
2 changed files with 4 additions and 3 deletions
|
@ -1,6 +1,6 @@
|
||||||
<?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="Validation" script:language="StarBasic">Sub markval16
|
<script:module xmlns:script="http://openoffice.org/2000/script" script:name="Validation" script:language="StarBasic">Sub markval17
|
||||||
|
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
|
@ -72,7 +72,7 @@ Sub validateButton
|
||||||
If sectionsReport <> "" Then
|
If sectionsReport <> "" Then
|
||||||
MsgBox sectionsReport
|
MsgBox sectionsReport
|
||||||
EndIf
|
EndIf
|
||||||
If isInDoc("[\uE000-\uF8FF]") Then
|
If isInDoc("[\uE000-\uF8FF]") Or isInDoc("(?<=DOI[0-9. /XVI:‒–—−ХOО?-]{1,50})[ХOО‒–—−?]{1,5}") Then
|
||||||
badText = true
|
badText = true
|
||||||
EndIf
|
EndIf
|
||||||
|
|
||||||
|
@ -144,6 +144,7 @@ End Function
|
||||||
Private Sub removeBadCharacters
|
Private Sub removeBadCharacters
|
||||||
StartTracking
|
StartTracking
|
||||||
AskAndReplace("[\uE000-\uF8FF]+","")
|
AskAndReplace("[\uE000-\uF8FF]+","")
|
||||||
|
AskAndReplace("(?<=DOI[0-9. /XVI:‒–—−ХOО?-]{1,50})[ХOО‒–—−?]{1,5}","")
|
||||||
StopTracking
|
StopTracking
|
||||||
showTrackedChanges
|
showTrackedChanges
|
||||||
End Sub
|
End Sub
|
||||||
|
|
|
@ -1 +1 @@
|
||||||
version=0.9.12
|
version=0.9.13
|
||||||
|
|
Loading…
Add table
Reference in a new issue