From a488a9b01961b51c97417921d74ec6d3f729ad63 Mon Sep 17 00:00:00 2001
From: Georgy Litvinov <git@litvinovg.pro>
Date: Thu, 6 May 2021 16:08:21 +0200
Subject: [PATCH] Set Standard for all headings' numeration character styles

---
 Redaction/Clean.xba | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/Redaction/Clean.xba b/Redaction/Clean.xba
index 919e218..dab2f94 100644
--- a/Redaction/Clean.xba
+++ b/Redaction/Clean.xba
@@ -1,6 +1,6 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <!DOCTYPE script:module PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "module.dtd">
-<script:module xmlns:script="http://openoffice.org/2000/script" script:name="Clean" script:language="StarBasic">Sub mark80
+<script:module xmlns:script="http://openoffice.org/2000/script" script:name="Clean" script:language="StarBasic">Sub mark81
 
 End Sub
 
@@ -1963,7 +1963,7 @@ Sub resetChapterNumberingRules
 		    numRuleProperty.Value = &quot;&quot;
 		  End If
 		  If (numRuleProperty.Name = &quot;CharStyleName&quot;) Then
-		    numRuleProperty.Value = &quot;None&quot;
+		    numRuleProperty.Value = &quot;Standard&quot;
 		  End If
 		  numRulesProps(n) = numRuleProperty
 		Next n