diff --git a/src/Microdown-BookTester/MicAnchorResult.class.st b/src/Microdown-BookTester/MicAnchorResult.class.st
index d8faa2e95..9d2b02cc1 100644
--- a/src/Microdown-BookTester/MicAnchorResult.class.st
+++ b/src/Microdown-BookTester/MicAnchorResult.class.st
@@ -38,6 +38,12 @@ MicAnchorResult >> explanation [
 	
 ]
 
+{ #category : 'accessing' }
+MicAnchorResult >> headerString [
+
+	^ 'Anchor'
+]
+
 { #category : 'accessing' }
 MicAnchorResult >> isWhat [
 	^  'anchor problem'
diff --git a/src/Microdown-BookTester/MicBookTestResult.class.st b/src/Microdown-BookTester/MicBookTestResult.class.st
index 98e57b219..6a8129387 100644
--- a/src/Microdown-BookTester/MicBookTestResult.class.st
+++ b/src/Microdown-BookTester/MicBookTestResult.class.st
@@ -109,6 +109,12 @@ MicBookTestResult >> fragmentedText: aText [
 	fragmentedText := aText
 ]
 
+{ #category : 'accessing' }
+MicBookTestResult >> headerString [
+
+	^ 'Book Test'
+]
+
 { #category : 'initialization' }
 MicBookTestResult >> initialize [
 
diff --git a/src/Microdown-BookTester/MicBrokenSyncDefinitionResult.class.st b/src/Microdown-BookTester/MicBrokenSyncDefinitionResult.class.st
index 5fa7f0c91..54804825c 100644
--- a/src/Microdown-BookTester/MicBrokenSyncDefinitionResult.class.st
+++ b/src/Microdown-BookTester/MicBrokenSyncDefinitionResult.class.st
@@ -36,6 +36,12 @@ MicBrokenSyncDefinitionResult >> explanation [
 	^ 'The sync definition has the following broken value: ', syncValue, ' .'
 ]
 
+{ #category : 'initialization' }
+MicBrokenSyncDefinitionResult >> headerString [
+
+	^ 'Broken Sync Definition'
+]
+
 { #category : 'initialization' }
 MicBrokenSyncDefinitionResult >> initialize [ 
 	
diff --git a/src/Microdown-BookTester/MicBrokenSyncOriginDefinitionResult.class.st b/src/Microdown-BookTester/MicBrokenSyncOriginDefinitionResult.class.st
index ca49215b5..f1c987b86 100644
--- a/src/Microdown-BookTester/MicBrokenSyncOriginDefinitionResult.class.st
+++ b/src/Microdown-BookTester/MicBrokenSyncOriginDefinitionResult.class.st
@@ -27,6 +27,12 @@ MicBrokenSyncOriginDefinitionResult >> explanation [
 	^ 'The sync origin in the definition is bogus it should be C [class]>> #selector and we get: ', origin
 ]
 
+{ #category : 'kinds' }
+MicBrokenSyncOriginDefinitionResult >> headerString [
+
+	^ 'Broken Sync Origin Definition'
+]
+
 { #category : 'initialization' }
 MicBrokenSyncOriginDefinitionResult >> initialize [ 
 	super initialize.
diff --git a/src/Microdown-BookTester/MicChecker.class.st b/src/Microdown-BookTester/MicChecker.class.st
index bfefcd2e5..6d6551232 100644
--- a/src/Microdown-BookTester/MicChecker.class.st
+++ b/src/Microdown-BookTester/MicChecker.class.st
@@ -124,7 +124,6 @@ MicChecker >> isOkay [
 ]
 
 { #category : 'accessing' }
-
 MicChecker >> reportWriter [
 
 	^ reportWriter
@@ -142,7 +141,6 @@ MicChecker >> resultHeaderStrings [
 ]
 
 { #category : 'visiting' }
-
 MicChecker >> results [
 
 	^ results
diff --git a/src/Microdown-BookTester/MicCheckerDashboard.class.st b/src/Microdown-BookTester/MicCheckerDashboard.class.st
index dbcc91fc3..c5beffe4d 100644
--- a/src/Microdown-BookTester/MicCheckerDashboard.class.st
+++ b/src/Microdown-BookTester/MicCheckerDashboard.class.st
@@ -25,6 +25,19 @@ Class {
 	#tag : 'UI'
 }
 
+{ #category : 'examples' }
+MicCheckerDashboard class >> example [
+
+	<script>
+	self new open
+]
+
+{ #category : 'initialization' }
+MicCheckerDashboard >> checkerClasses [
+
+	^ MicChecker allSubclasses reject: [ :cls | cls isAbstract ] 
+
+]
 
 { #category : 'accessing' }
 MicCheckerDashboard >> checkerList [
@@ -42,20 +55,6 @@ MicCheckerDashboard >> checkerResults: aDict [
 	checkerResults:= aDict 
 ]
 
-{ #category : 'examples' }
-MicCheckerDashboard class >> example [
-
-	<script>
-	self new open
-]
-
-{ #category : 'initialization' }
-MicCheckerDashboard >> checkerClasses [
-
-	^ MicChecker allSubclasses reject: [ :cls | cls isAbstract ] 
-
-]
-
 { #category : 'initialization' }
 MicCheckerDashboard >> connectPresenters [
     checkerList presenters do: [ :cb |
diff --git a/src/Microdown-BookTester/MicCodeIndentationResult.class.st b/src/Microdown-BookTester/MicCodeIndentationResult.class.st
index 3e7083a1b..35b53b43c 100644
--- a/src/Microdown-BookTester/MicCodeIndentationResult.class.st
+++ b/src/Microdown-BookTester/MicCodeIndentationResult.class.st
@@ -29,3 +29,9 @@ MicCodeIndentationResult >> explanation [
 	, detail 
 	, '] should use tabs instead of spaces for indentation.'
 ]
+
+{ #category : 'kinds' }
+MicCodeIndentationResult >> headerString [
+
+	^ 'Code Indentation'
+]
diff --git a/src/Microdown-BookTester/MicDesynchronizedCodeResult.class.st b/src/Microdown-BookTester/MicDesynchronizedCodeResult.class.st
index 078106a7c..af0eab6d8 100644
--- a/src/Microdown-BookTester/MicDesynchronizedCodeResult.class.st
+++ b/src/Microdown-BookTester/MicDesynchronizedCodeResult.class.st
@@ -37,6 +37,12 @@ MicDesynchronizedCodeResult >> explanation [
 	^ 'The code block body of ', originString , ' is not in sync with the version in Pharo ', pharoVersion, 'in file: ', self inFile fullName
 ]
 
+{ #category : 'kinds' }
+MicDesynchronizedCodeResult >> headerString [
+
+	^ 'Desynchronized Code'
+]
+
 { #category : 'accessing' }
 MicDesynchronizedCodeResult >> imageContent: aString [ 
 	imageContents := aString
diff --git a/src/Microdown-BookTester/MicDoublePeriodResult.class.st b/src/Microdown-BookTester/MicDoublePeriodResult.class.st
index 6ba47a38a..5443b777a 100644
--- a/src/Microdown-BookTester/MicDoublePeriodResult.class.st
+++ b/src/Microdown-BookTester/MicDoublePeriodResult.class.st
@@ -11,3 +11,9 @@ MicDoublePeriodResult >> explanation [
 
 	^  'Text: "' , micElement text , '" in file' , self inFile fullName , ' contains two periods.'
 ]
+
+{ #category : 'accessing' }
+MicDoublePeriodResult >> headerString [
+
+	^ 'Double Period'
+]
diff --git a/src/Microdown-BookTester/MicDuplicatedAnchorResult.class.st b/src/Microdown-BookTester/MicDuplicatedAnchorResult.class.st
index 4e3615e61..a14172af6 100644
--- a/src/Microdown-BookTester/MicDuplicatedAnchorResult.class.st
+++ b/src/Microdown-BookTester/MicDuplicatedAnchorResult.class.st
@@ -21,6 +21,12 @@ MicDuplicatedAnchorResult class >> headerString [
 	^ 'Duplicated Anchors:'
 ]
 
+{ #category : 'accessing' }
+MicDuplicatedAnchorResult >> headerString [
+
+	^ 'Duplicated Anchor'
+]
+
 { #category : 'accessing' }
 MicDuplicatedAnchorResult >> isWhat [
 	^  'duplicated'
diff --git a/src/Microdown-BookTester/MicElementAfterColonIsNotCapitalizedResult.class.st b/src/Microdown-BookTester/MicElementAfterColonIsNotCapitalizedResult.class.st
index b06c793ea..e0618919a 100644
--- a/src/Microdown-BookTester/MicElementAfterColonIsNotCapitalizedResult.class.st
+++ b/src/Microdown-BookTester/MicElementAfterColonIsNotCapitalizedResult.class.st
@@ -10,3 +10,9 @@ Class {
 MicElementAfterColonIsNotCapitalizedResult >> explanation [ 
 			^ 'Header: "' , micElement text , '" in file' , self inFile fullName , ' contains a mistake: ', detail , ' as first letter after a colon should be uppercased.'
 ]
+
+{ #category : 'kinds' }
+MicElementAfterColonIsNotCapitalizedResult >> headerString [
+
+	^ 'Element After Conolis Not Capitalized'
+]
diff --git a/src/Microdown-BookTester/MicElementOfHeaderIsNotCapitalizedResult.class.st b/src/Microdown-BookTester/MicElementOfHeaderIsNotCapitalizedResult.class.st
index bc7460ac4..1236cb3cf 100644
--- a/src/Microdown-BookTester/MicElementOfHeaderIsNotCapitalizedResult.class.st
+++ b/src/Microdown-BookTester/MicElementOfHeaderIsNotCapitalizedResult.class.st
@@ -10,3 +10,9 @@ Class {
 MicElementOfHeaderIsNotCapitalizedResult >> explanation [ 
 	^ 'Header: "' , micElement text , '" in file' , self inFile fullName , ' contains a mistake: ' , detail , ' should be capitalized.'
 ]
+
+{ #category : 'kinds' }
+MicElementOfHeaderIsNotCapitalizedResult >> headerString [
+
+	^ 'Element Of Header Is Not Capitalized'
+]
diff --git a/src/Microdown-BookTester/MicFirstElementOfHeaderIsNotCapitalizedResult.class.st b/src/Microdown-BookTester/MicFirstElementOfHeaderIsNotCapitalizedResult.class.st
index 333a171e6..22bce1e33 100644
--- a/src/Microdown-BookTester/MicFirstElementOfHeaderIsNotCapitalizedResult.class.st
+++ b/src/Microdown-BookTester/MicFirstElementOfHeaderIsNotCapitalizedResult.class.st
@@ -13,3 +13,9 @@ MicFirstElementOfHeaderIsNotCapitalizedResult >> explanation [
 	^ 'Header: "' , micElement text , '" in file' , self inFile fullName , ' contains a mistake: ', detail, ' as first word of the header should be uppercased.'
 	 
 ]
+
+{ #category : 'kinds' }
+MicFirstElementOfHeaderIsNotCapitalizedResult >> headerString [
+
+	^ 'First Element Of Header Is Not Capitalized'
+]
diff --git a/src/Microdown-BookTester/MicFrenchTypographyResult.class.st b/src/Microdown-BookTester/MicFrenchTypographyResult.class.st
index d4631fa6a..97d71bab2 100644
--- a/src/Microdown-BookTester/MicFrenchTypographyResult.class.st
+++ b/src/Microdown-BookTester/MicFrenchTypographyResult.class.st
@@ -29,3 +29,9 @@ MicFrenchTypographyResult >> explanation [
 	, '" in file' , self inFile fullName
 	, ' contains a mistake: ' , detail
 ]
+
+{ #category : 'kinds' }
+MicFrenchTypographyResult >> headerString [
+
+	^ 'French Typography'
+]
diff --git a/src/Microdown-BookTester/MicHeaderWronglyLowercasedResult.class.st b/src/Microdown-BookTester/MicHeaderWronglyLowercasedResult.class.st
index 39fd40ed0..bfd621c30 100644
--- a/src/Microdown-BookTester/MicHeaderWronglyLowercasedResult.class.st
+++ b/src/Microdown-BookTester/MicHeaderWronglyLowercasedResult.class.st
@@ -13,3 +13,9 @@ MicHeaderWronglyLowercasedResult >> explanation [
 	^ 'Header: "' , micElement text , '" in file' , self inFile fullName , ' contains a mistake: ', detail, ' should not be lowercased.'
 	 
 ]
+
+{ #category : 'kinds' }
+MicHeaderWronglyLowercasedResult >> headerString [
+
+	^ 'Header Wrongly Lowercased'
+]
diff --git a/src/Microdown-BookTester/MicHeaderWronglyUppercasedResult.class.st b/src/Microdown-BookTester/MicHeaderWronglyUppercasedResult.class.st
index 571baaedf..c6a7ed825 100644
--- a/src/Microdown-BookTester/MicHeaderWronglyUppercasedResult.class.st
+++ b/src/Microdown-BookTester/MicHeaderWronglyUppercasedResult.class.st
@@ -13,3 +13,9 @@ MicHeaderWronglyUppercasedResult >> explanation [
 	^ 'Header: "' , micElement text , '" in file' , self inFile fullName , ' contains a mistake: ', detail, ' should not be uppercased.'
 	 
 ]
+
+{ #category : 'kinds' }
+MicHeaderWronglyUppercasedResult >> headerString [
+
+	^ 'Header Wrongly Uppercased'
+]
diff --git a/src/Microdown-BookTester/MicLastPeriodResult.class.st b/src/Microdown-BookTester/MicLastPeriodResult.class.st
index 5b0d40553..7bf211d86 100644
--- a/src/Microdown-BookTester/MicLastPeriodResult.class.st
+++ b/src/Microdown-BookTester/MicLastPeriodResult.class.st
@@ -14,3 +14,9 @@ MicLastPeriodResult >> codeShouldEndWithPeriod: aBoolean [
 
 	codeShouldEndWithPeriod := aBoolean 
 ]
+
+{ #category : 'kinds' }
+MicLastPeriodResult >> headerString [
+
+	^ 'Last Period'
+]
diff --git a/src/Microdown-BookTester/MicMethodReferenceResult.class.st b/src/Microdown-BookTester/MicMethodReferenceResult.class.st
index 6aaa363e6..54d8f4dc3 100644
--- a/src/Microdown-BookTester/MicMethodReferenceResult.class.st
+++ b/src/Microdown-BookTester/MicMethodReferenceResult.class.st
@@ -27,3 +27,9 @@ MicMethodReferenceResult >> explanation [
 	, '" in file' , self inFile fullName 
 	, ' contains a mistake: method references must be consistent, either always with # or always without #.'
 ]
+
+{ #category : 'kinds' }
+MicMethodReferenceResult >> headerString [
+
+	^ 'Method Reference'
+]
diff --git a/src/Microdown-BookTester/MicMethodStructureResult.class.st b/src/Microdown-BookTester/MicMethodStructureResult.class.st
index fe80f730f..c75e9ac79 100644
--- a/src/Microdown-BookTester/MicMethodStructureResult.class.st
+++ b/src/Microdown-BookTester/MicMethodStructureResult.class.st
@@ -29,3 +29,9 @@ MicMethodStructureResult >> explanation [
 	, detail 
 	, '] should have an empty line after the selector when is no comment.'
 ]
+
+{ #category : 'kinds' }
+MicMethodStructureResult >> headerString [
+
+	^ 'Method Structure'
+]
diff --git a/src/Microdown-BookTester/MicMissingFigureCaptionResult.class.st b/src/Microdown-BookTester/MicMissingFigureCaptionResult.class.st
index d30fdbc07..0888bdef8 100644
--- a/src/Microdown-BookTester/MicMissingFigureCaptionResult.class.st
+++ b/src/Microdown-BookTester/MicMissingFigureCaptionResult.class.st
@@ -18,3 +18,9 @@ MicMissingFigureCaptionResult >> figure [
 MicMissingFigureCaptionResult >> figure: aFigure [
 	figure := aFigure
 ]
+
+{ #category : 'kinds' }
+MicMissingFigureCaptionResult >> headerString [
+
+	^ 'Missing Figure Caption'
+]
diff --git a/src/Microdown-BookTester/MicParagraphLabelResult.class.st b/src/Microdown-BookTester/MicParagraphLabelResult.class.st
index c2dd0ce3a..a0d502037 100644
--- a/src/Microdown-BookTester/MicParagraphLabelResult.class.st
+++ b/src/Microdown-BookTester/MicParagraphLabelResult.class.st
@@ -33,6 +33,12 @@ MicParagraphLabelResult >> explanation [
 	), 'be terminated with a period (.).'
 ]
 
+{ #category : 'kinds' }
+MicParagraphLabelResult >> headerString [
+
+	^ 'Paragraph Label'
+]
+
 { #category : 'accessing' }
 MicParagraphLabelResult >> labelShouldEndWithPeriod: aBoolean [
 
diff --git a/src/Microdown-BookTester/MicPeriodInCodeResult.class.st b/src/Microdown-BookTester/MicPeriodInCodeResult.class.st
index 030341dd7..fe1811153 100644
--- a/src/Microdown-BookTester/MicPeriodInCodeResult.class.st
+++ b/src/Microdown-BookTester/MicPeriodInCodeResult.class.st
@@ -14,3 +14,9 @@ MicPeriodInCodeResult >> explanation [
 			   ifFalse: [ ' not ' ]
 			   ifTrue: [ ' ' ]) , 'be terminated with a period (.).'
 ]
+
+{ #category : 'explanation' }
+MicPeriodInCodeResult >> headerString [
+
+	^ 'Period Code'
+]
diff --git a/src/Microdown-BookTester/MicReferenceToUnexistingAnchorResult.class.st b/src/Microdown-BookTester/MicReferenceToUnexistingAnchorResult.class.st
index 7196f658c..3951134e8 100644
--- a/src/Microdown-BookTester/MicReferenceToUnexistingAnchorResult.class.st
+++ b/src/Microdown-BookTester/MicReferenceToUnexistingAnchorResult.class.st
@@ -21,6 +21,12 @@ MicReferenceToUnexistingAnchorResult class >> headerString [
 	^ 'Undefined Anchors:'
 ]
 
+{ #category : 'accessing' }
+MicReferenceToUnexistingAnchorResult >> headerString [
+
+	^ 'Reference To Unexisting Anchor'
+]
+
 { #category : 'accessing' }
 MicReferenceToUnexistingAnchorResult >> isWhat [
 	^  'undefined'
diff --git a/src/Microdown-BookTester/MicUndefinedFigureFileResult.class.st b/src/Microdown-BookTester/MicUndefinedFigureFileResult.class.st
index 562cebac4..596dcf759 100644
--- a/src/Microdown-BookTester/MicUndefinedFigureFileResult.class.st
+++ b/src/Microdown-BookTester/MicUndefinedFigureFileResult.class.st
@@ -43,6 +43,12 @@ MicUndefinedFigureFileResult >> figureFileString: aString [
 	figureFileString := aString
 ]
 
+{ #category : 'accessing' }
+MicUndefinedFigureFileResult >> headerString [
+
+	^ 'Underfined Figure File'
+]
+
 { #category : 'accessing' }
 MicUndefinedFigureFileResult >> what [ 
 
diff --git a/src/Microdown-BookTester/MicUndefinedInputFileResult.class.st b/src/Microdown-BookTester/MicUndefinedInputFileResult.class.st
index 69515409c..71afbde69 100644
--- a/src/Microdown-BookTester/MicUndefinedInputFileResult.class.st
+++ b/src/Microdown-BookTester/MicUndefinedInputFileResult.class.st
@@ -31,6 +31,12 @@ MicUndefinedInputFileResult >> explanation [
 	
 ]
 
+{ #category : 'kinds' }
+MicUndefinedInputFileResult >> headerString [
+
+	^ 'Undefined Input File'
+]
+
 { #category : 'inputFileBlock:' }
 MicUndefinedInputFileResult >> inputFile [ 
 	
diff --git a/src/Microdown-BookTester/MicUnreferencedFigureResult.class.st b/src/Microdown-BookTester/MicUnreferencedFigureResult.class.st
index a1683dfe1..ccaa54f6e 100644
--- a/src/Microdown-BookTester/MicUnreferencedFigureResult.class.st
+++ b/src/Microdown-BookTester/MicUnreferencedFigureResult.class.st
@@ -51,6 +51,12 @@ MicUnreferencedFigureResult >> figurePath: aString [
 	figurePath := aString
 ]
 
+{ #category : 'kinds' }
+MicUnreferencedFigureResult >> headerString [
+
+	^ 'Unreferenced Figure'
+]
+
 { #category : 'accessing' }
 MicUnreferencedFigureResult >> what [ 
 
diff --git a/src/Microdown-BookTester/MicUseofWrongVocabularyResult.class.st b/src/Microdown-BookTester/MicUseofWrongVocabularyResult.class.st
index 0bfcc5ed0..51eecdba3 100644
--- a/src/Microdown-BookTester/MicUseofWrongVocabularyResult.class.st
+++ b/src/Microdown-BookTester/MicUseofWrongVocabularyResult.class.st
@@ -19,6 +19,12 @@ MicUseofWrongVocabularyResult >> explanation [
 	  , '] should not be used. We should use ' , goodWord
 ]
 
+{ #category : 'kinds' }
+MicUseofWrongVocabularyResult >> headerString [
+
+	^ 'USe of Wrong Vocabulary'
+]
+
 { #category : 'accessing' }
 MicUseofWrongVocabularyResult >> patternPair: anAssociation [ 
 	patternPair := anAssociation 
diff --git a/src/Microdown-BookTester/MicWithDetailResult.class.st b/src/Microdown-BookTester/MicWithDetailResult.class.st
index 4f5796636..9f2bc88d8 100644
--- a/src/Microdown-BookTester/MicWithDetailResult.class.st
+++ b/src/Microdown-BookTester/MicWithDetailResult.class.st
@@ -20,6 +20,12 @@ MicWithDetailResult >> detail: aString [
 	detail := aString
 ]
 
+{ #category : 'kinds' }
+MicWithDetailResult >> headerString [
+
+	^ 'With detail'
+]
+
 { #category : 'printing' }
 MicWithDetailResult >> printOn: aStream [
 
diff --git a/src/Microdown-BookTester/MicWrongCaseFileResult.class.st b/src/Microdown-BookTester/MicWrongCaseFileResult.class.st
index 4c23a1f91..0a6d98e58 100644
--- a/src/Microdown-BookTester/MicWrongCaseFileResult.class.st
+++ b/src/Microdown-BookTester/MicWrongCaseFileResult.class.st
@@ -19,6 +19,12 @@ MicWrongCaseFileResult >> figureFileString: aString [
 	figureFileString := aString
 ]
 
+{ #category : 'kinds' }
+MicWrongCaseFileResult >> headerString [
+
+	^ 'Wrong Case File'
+]
+
 { #category : 'accessing' }
 MicWrongCaseFileResult >> what [
 	^ figureFileString
diff --git a/src/Microdown-BookTester/MicWrongReferenceToFigSectTableAnchorResult.class.st b/src/Microdown-BookTester/MicWrongReferenceToFigSectTableAnchorResult.class.st
index 631f74871..eb65acb8b 100644
--- a/src/Microdown-BookTester/MicWrongReferenceToFigSectTableAnchorResult.class.st
+++ b/src/Microdown-BookTester/MicWrongReferenceToFigSectTableAnchorResult.class.st
@@ -38,6 +38,12 @@ MicWrongReferenceToFigSectTableAnchorResult >> explanation [
 	, expected , '].'
 ]
 
+{ #category : 'kinds' }
+MicWrongReferenceToFigSectTableAnchorResult >> headerString [
+
+	^ 'Wrong Reference To Fig Sect Table Anchor'
+]
+
 { #category : 'accessing' }
 MicWrongReferenceToFigSectTableAnchorResult >> micElement: anObject [
     micElement := anObject