Offray/Brea
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Starting implementation of default app view body.

Browse Source
This commit is contained in:
Offray Vladimir Luna Cárdenas 2024-03-30 10:41:25 -05:00
parent 81298aefba
commit c609595272
1 changed files with 9 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
repository/Brea/BreaApp.class.st
View File

@ -10,6 +10,13 @@ Class {
#category : #Brea #category : #Brea
} }
{ #category : #accessing }
BreaApp >> add: anObject [
anObject class = String ifFalse: [ ].
self body
nextPutAll: (Pandoc htmlStringToMarkdown: anObject); cr.
]
{ #category : #accessing } { #category : #accessing }
BreaApp >> appName [ BreaApp >> appName [
^ self name asCamelCase ^ self name asCamelCase
@ -17,7 +24,7 @@ BreaApp >> appName [
{ #category : #accessing } { #category : #accessing }
BreaApp >> body [ BreaApp >> body [
^ body ifNil: [ body := '' writeStream contents ] ^ body ifNil: [ body := '' writeStream ]
] ]
{ #category : #accessing } { #category : #accessing }
@ -33,7 +40,7 @@ BreaApp >> defaultView [
</head> </head>
<body> <body>
<main class="container"> <main class="container">
', self body, ' ', self body contents, '
</main> </main>
</body> </body>
</html>' </html>'