blob: c35cc9557effd1f54454edec857d594ab3bae1ff (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
|
Class {
#name : 'TBAdminComponent',
#superclass : 'TBScreenComponent',
#category : 'TinyBlog-Components',
#package : 'TinyBlog-Components'
}
{ #category : 'initialization' }
TBAdminComponent >> createHeaderComponent [
^ TBAdminHeaderComponent from: self
]
{ #category : 'rendering' }
TBAdminComponent >> goToPostListView [
self answer
]
{ #category : 'acccessing' }
TBAdminComponent >> renderContentOn: html [
super renderContentOn: html.
html container: [
html heading: 'Blog Admin'.
html horizontalRule ]
]
|
