diff --git a/repository/Brea/BreaApp.class.st b/repository/Brea/BreaApp.class.st index 26515dd..73c42e7 100644 --- a/repository/Brea/BreaApp.class.st +++ b/repository/Brea/BreaApp.class.st @@ -3,7 +3,8 @@ Class { #superclass : #Object, #instVars : [ 'name', - 'folder' + 'folder', + 'server' ], #category : #Brea } @@ -37,3 +38,8 @@ BreaApp >> name: aString [ BreaApp >> parentFolder: anObject [ self folder: anObject / self name asCamelCase ] + +{ #category : #accessing } +BreaApp >> server [ + ^ server ifNil: [ server := MiniDocsServer singleton ] +]