Starting implementation of default app view body.
This commit is contained in:
parent
81298aefba
commit
c609595272
@ -10,6 +10,13 @@ Class {
|
||||
#category : #Brea
|
||||
}
|
||||
|
||||
{ #category : #accessing }
|
||||
BreaApp >> add: anObject [
|
||||
anObject class = String ifFalse: [ ].
|
||||
self body
|
||||
nextPutAll: (Pandoc htmlStringToMarkdown: anObject); cr.
|
||||
]
|
||||
|
||||
{ #category : #accessing }
|
||||
BreaApp >> appName [
|
||||
^ self name asCamelCase
|
||||
@ -17,7 +24,7 @@ BreaApp >> appName [
|
||||
|
||||
{ #category : #accessing }
|
||||
BreaApp >> body [
|
||||
^ body ifNil: [ body := '' writeStream contents ]
|
||||
^ body ifNil: [ body := '' writeStream ]
|
||||
]
|
||||
|
||||
{ #category : #accessing }
|
||||
@ -33,7 +40,7 @@ BreaApp >> defaultView [
|
||||
</head>
|
||||
<body>
|
||||
<main class="container">
|
||||
', self body, '
|
||||
', self body contents, '
|
||||
</main>
|
||||
</body>
|
||||
</html>'
|
||||
|
Loading…
Reference in New Issue
Block a user