From 3fa64c96447f0f165ee7bfecc0fc11bbd8655868 Mon Sep 17 00:00:00 2001 From: "antoine.usal" Date: Wed, 27 May 2026 15:50:35 +0200 Subject: [PATCH] add headerString for MicBook --- src/Microdown-BookTester/MicAnchorResult.class.st | 6 ++++++ src/Microdown-BookTester/MicBookTestResult.class.st | 6 ++++++ .../MicBrokenSyncDefinitionResult.class.st | 6 ++++++ .../MicBrokenSyncOriginDefinitionResult.class.st | 6 ++++++ src/Microdown-BookTester/MicCodeIndentationResult.class.st | 6 ++++++ .../MicDesynchronizedCodeResult.class.st | 6 ++++++ src/Microdown-BookTester/MicDoublePeriodResult.class.st | 6 ++++++ src/Microdown-BookTester/MicDuplicatedAnchorResult.class.st | 6 ++++++ .../MicElementAfterColonIsNotCapitalizedResult.class.st | 6 ++++++ .../MicElementOfHeaderIsNotCapitalizedResult.class.st | 6 ++++++ .../MicFirstElementOfHeaderIsNotCapitalizedResult.class.st | 6 ++++++ src/Microdown-BookTester/MicFrenchTypographyResult.class.st | 6 ++++++ .../MicHeaderWronglyLowercasedResult.class.st | 6 ++++++ .../MicHeaderWronglyUppercasedResult.class.st | 6 ++++++ src/Microdown-BookTester/MicLastPeriodResult.class.st | 6 ++++++ src/Microdown-BookTester/MicMethodReferenceResult.class.st | 6 ++++++ src/Microdown-BookTester/MicMethodStructureResult.class.st | 6 ++++++ .../MicMissingFigureCaptionResult.class.st | 6 ++++++ src/Microdown-BookTester/MicParagraphLabelResult.class.st | 6 ++++++ src/Microdown-BookTester/MicPeriodInCodeResult.class.st | 6 ++++++ .../MicReferenceToUnexistingAnchorResult.class.st | 6 ++++++ .../MicUndefinedFigureFileResult.class.st | 6 ++++++ .../MicUndefinedInputFileResult.class.st | 6 ++++++ .../MicUnreferencedFigureResult.class.st | 6 ++++++ .../MicUseofWrongVocabularyResult.class.st | 6 ++++++ src/Microdown-BookTester/MicWithDetailResult.class.st | 6 ++++++ src/Microdown-BookTester/MicWrongCaseFileResult.class.st | 6 ++++++ .../MicWrongReferenceToFigSectTableAnchorResult.class.st | 6 ++++++ 28 files changed, 168 insertions(+) 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/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 0d04d6b5d..de904bcf1 100644 --- a/src/Microdown-BookTester/MicWrongReferenceToFigSectTableAnchorResult.class.st +++ b/src/Microdown-BookTester/MicWrongReferenceToFigSectTableAnchorResult.class.st @@ -37,3 +37,9 @@ MicWrongReferenceToFigSectTableAnchorResult >> explanation [ , '] should be capitalized as [' , expected , '].' ] + +{ #category : 'kinds' } +MicWrongReferenceToFigSectTableAnchorResult >> headerString [ + + ^ 'Wrong Reference To Fig Sect Table Anchor' +]