diff --git a/IPHRedaction/Clean.xba b/IPHRedaction/Clean.xba
index 322db3a..b1f0409 100644
--- a/IPHRedaction/Clean.xba
+++ b/IPHRedaction/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 markXXFXKY
+<script:module xmlns:script="http://openoffice.org/2000/script" script:name="Clean" script:language="StarBasic">Sub markFDSID
 
 End Sub
 
@@ -108,11 +108,13 @@ Private Sub convertFontsToCharStyles
 	  founds = Thiscomponent.findFirst(SDesc)
 	  do while not isNull(founds)
 	    curFont = founds.CharFontName
-        If Not DocHasCharStyle(oDoc,curFont) Then
-	        oProps() = Array(CreateProperty(&quot;CharFontName&quot;, curFont))
-			CreateCharacterStyle(curFont, oProps())
-		End If
-	    founds.CharStyleNames = Array(curFont)
+	    If curFont &lt;&gt; &quot;IPH Astra Serif&quot; AND curFont &lt;&gt; &quot;&quot; Then
+	        If Not DocHasCharStyle(oDoc,curFont) Then
+		        oProps() = Array(CreateProperty(&quot;CharFontName&quot;, curFont))
+				CreateCharacterStyle(curFont, oProps())
+			End If
+		    founds.CharStyleNames = Array(curFont)
+	    EndIf
 	    founds = Thiscomponent.findNext(founds.getend, SDesc)
 	  loop
 End Sub
@@ -886,4 +888,4 @@ Private Function getStyleNames(oFamily,bLocalized as Boolean, _
 	Endif
 	xArray(iUB) = vNextElement
 End Sub
-</script:module>
+</script:module>
\ No newline at end of file
diff --git a/description.xml b/description.xml
index 2478699..4c0311f 100644
--- a/description.xml
+++ b/description.xml
@@ -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.7" />
+  <version value="0.2.8" />
   <platform value="all" />
   <display-name>
     <name lang="en">Redaction for publishing in Institute of philosophy</name>
diff --git a/redaction.oxt b/redaction.oxt
index 9e7c3e0..5b6a716 100644
Binary files a/redaction.oxt and b/redaction.oxt differ