Starting BreaApps.
This commit is contained in:
parent
bbda57b908
commit
8833341eee
39
repository/Brea/BreaApp.class.st
Normal file
39
repository/Brea/BreaApp.class.st
Normal file
@ -0,0 +1,39 @@
|
||||
Class {
|
||||
#name : #BreaApp,
|
||||
#superclass : #Object,
|
||||
#instVars : [
|
||||
'name',
|
||||
'folder'
|
||||
],
|
||||
#category : #Brea
|
||||
}
|
||||
|
||||
{ #category : #accessing }
|
||||
BreaApp >> folder [
|
||||
^ folder
|
||||
]
|
||||
|
||||
{ #category : #accessing }
|
||||
BreaApp >> folder: aFileDirectory [
|
||||
folder := aFileDirectory
|
||||
]
|
||||
|
||||
{ #category : #accessing }
|
||||
BreaApp >> launch [
|
||||
^ MiniDocsServer singleton
|
||||
]
|
||||
|
||||
{ #category : #accessing }
|
||||
BreaApp >> name [
|
||||
^ name
|
||||
]
|
||||
|
||||
{ #category : #accessing }
|
||||
BreaApp >> name: aString [
|
||||
name := aString
|
||||
]
|
||||
|
||||
{ #category : #accessing }
|
||||
BreaApp >> parentFolder: anObject [
|
||||
self folder: anObject / self name asCamelCase
|
||||
]
|
Loading…
Reference in New Issue
Block a user