From a7931f6a9611c658f5614cc66035adfd4f1de296 Mon Sep 17 00:00:00 2001
From: Offray Luna <offray.luna@mutabit.com>
Date: Sun, 12 Mar 2023 08:49:48 -0500
Subject: [PATCH] HedgeDoc and Markdeep as subclass of Markdown.

---
 src/MiniDocs/HedgeDoc.class.st | 4 ++--
 src/MiniDocs/Markdown.class.st | 8 ++++----
 2 files changed, 6 insertions(+), 6 deletions(-)

diff --git a/src/MiniDocs/HedgeDoc.class.st b/src/MiniDocs/HedgeDoc.class.st
index ae68293..23bfedc 100644
--- a/src/MiniDocs/HedgeDoc.class.st
+++ b/src/MiniDocs/HedgeDoc.class.st
@@ -34,12 +34,12 @@ HedgeDoc >> asMarkdownTiddler [
 
 { #category : #accessing }
 HedgeDoc >> contents [
-	^ contents
+	^ body
 ]
 
 { #category : #accessing }
 HedgeDoc >> contents: anObject [
-	contents := anObject
+	body := anObject
 ]
 
 { #category : #'as yet unclassified' }
diff --git a/src/MiniDocs/Markdown.class.st b/src/MiniDocs/Markdown.class.st
index eb89ec8..b0ca824 100644
--- a/src/MiniDocs/Markdown.class.st
+++ b/src/MiniDocs/Markdown.class.st
@@ -8,9 +8,9 @@ Class {
 	#name : #Markdown,
 	#superclass : #Object,
 	#instVars : [
-		'contents',
 		'file',
-		'metadata'
+		'metadata',
+		'body'
 	],
 	#category : #MiniDocs
 }
@@ -47,12 +47,12 @@ Markdown >> containsYAMLMetadataClosing [
 
 { #category : #accessing }
 Markdown >> contents [
-	^ contents
+	^ body
 ]
 
 { #category : #accessing }
 Markdown >> contents: anObject [
-	contents := anObject
+	body := anObject
 ]
 
 { #category : #accessing }