Class {
	#name : 'TBApplicationRootComponent',
	#superclass : 'WAComponent',
	#instVars : [
		'main'
	],
	#category : 'TinyBlog-Components',
	#package : 'TinyBlog-Components'
}

{ #category : 'testing' }
TBApplicationRootComponent class >> canBeRoot [
	^ true
]

{ #category : 'initialization' }
TBApplicationRootComponent class >> initialize [
	"self initialize"
	| app |
	app := WAAdmin register: self asApplicationAt: 'TinyBlog'.
	app
		preferenceAt: #sessionClass put: TBSession.
	app
		addLibrary: JQDeploymentLibrary;
		addLibrary: JQUiDeploymentLibrary;
		addLibrary: SBSDeploymentLibrary
]

{ #category : 'rendering' }
TBApplicationRootComponent >> children [
	^ {  main }
]

{ #category : 'initialization' }
TBApplicationRootComponent >> initialize [
	super initialize.
	main := TBPostsListComponent new
]

{ #category : 'initialization' }
TBApplicationRootComponent >> main: aComponent [

	main := aComponent
]

{ #category : 'rendering' }
TBApplicationRootComponent >> renderContentOn: html [
	html render: main.
	SBSDeploymentLibrary addLoadScriptTo: html
]

{ #category : 'rendering' }
TBApplicationRootComponent >> updateRoot: anHtmlRoot [
	super updateRoot: anHtmlRoot.
	anHtmlRoot beHtml5.
	anHtmlRoot title: 'TinyBlog'
]