fixing protocol.

pillar-markup · Oct 28, 2024 · aa249ef · aa249ef
1 parent 397cbf4
commit aa249ef
Show file tree

Hide file tree

Showing 2 changed files with 7 additions and 7 deletions.
diff --git a/src/Microdown/MicAnnotatedParagraphBlock.class.st b/src/Microdown/MicAnnotatedParagraphBlock.class.st
@@ -42,20 +42,20 @@ MicAnnotatedParagraphBlock >> closeMe [
 	body := self inlineParse: body
 ]
 
-{ #category : 'testing' }
+{ #category : 'accessing' }
 MicAnnotatedParagraphBlock >> defaultLabel [ 
 
 	^ #note
 ]
 
-{ #category : 'testing' }
+{ #category : 'initialization' }
 MicAnnotatedParagraphBlock >> initialize [
 
 	super initialize.
 	validLabels := { #note. #important. #todo }
 ]
 
-{ #category : 'testing' }
+{ #category : 'accessing' }
 MicAnnotatedParagraphBlock >> lineMarkup [
 
 	^ AnnotatedParagraphOpeningMarkup

diff --git a/src/Microdown/MicEnvironmentBlock.class.st b/src/Microdown/MicEnvironmentBlock.class.st
@@ -119,19 +119,19 @@ MicEnvironmentBlock >> arguments [
 	^ arguments
 ]
 
-{ #category : 'parse support' }
+{ #category : 'accessing' }
 MicEnvironmentBlock >> body [
 
 	^ String streamContents: [:s |  self bodyElements do: [ :each | s nextPutAll: each substring ] ]
 ]
 
-{ #category : 'parse support' }
+{ #category : 'accessing' }
 MicEnvironmentBlock >> bodyElements [
 
 	^ children
 ]
 
-{ #category : 'parse support' }
+{ #category : 'accessing' }
 MicEnvironmentBlock >> bodyFromLine: line [
 	
 	| newBlock |
@@ -176,7 +176,7 @@ MicEnvironmentBlock >> extractFirstLineFrom: aLine [
 		ifFalse: [ firstLine ]
 ]
 
-{ #category : 'parse support' }
+{ #category : 'initialization' }
 MicEnvironmentBlock >> initialize [
 
 	super initialize.