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"?>
|
||||
<!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
|
||||
|
||||
|
@ -72,7 +72,7 @@ Sub validateButton
|
|||
If sectionsReport <> "" Then
|
||||
MsgBox sectionsReport
|
||||
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
|
||||
EndIf
|
||||
|
||||
|
@ -144,6 +144,7 @@ End Function
|
|||
Private Sub removeBadCharacters
|
||||
StartTracking
|
||||
AskAndReplace("[\uE000-\uF8FF]+","")
|
||||
AskAndReplace("(?<=DOI[0-9. /XVI:‒–—−ХOО?-]{1,50})[ХOО‒–—−?]{1,5}","")
|
||||
StopTracking
|
||||
showTrackedChanges
|
||||
End Sub
|
||||
|
|
|
@ -1 +1 @@
|
|||
version=0.9.12
|
||||
version=0.9.13
|
||||
|
|
Loading…
Add table
Reference in a new issue