Starting BreaApps.

This commit is contained in:
Offray Vladimir Luna Cárdenas 2024-03-29 20:11:27 -05:00
parent bbda57b908
commit 8833341eee

View 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
]