Improving document tree views.

2024-02-08 15:59:07 -05:00 · 2024-02-08 15:59:07 -05:00 · 06ccc84c29
parent 2a2a4bb5f1
commit 06ccc84c29
1 changed files with 5 additions and 0 deletions
--- a/src/PetitMarkdown/PPCMInlinedCode.class.st
+++ b/src/PetitMarkdown/PPCMInlinedCode.class.st
@ -26,3 +26,8 @@ PPCMInlinedCode >> code: anObject [
 PPCMInlinedCode >> text [
 	^ code
 ]
+
+{ #category : #accessing }
+PPCMInlinedCode >> viewBody [
+	^ (self className ,' ', self text) asRopedText.
+]