28 lines
470 B
Smalltalk
28 lines
470 B
Smalltalk
"
|
|
I model the fossil repository where public data is stored for the
|
|
building of this web site.
|
|
"
|
|
Class {
|
|
#name : #BreaWebsite,
|
|
#superclass : #Object,
|
|
#instVars : [
|
|
'fossilRepo'
|
|
],
|
|
#category : #Brea
|
|
}
|
|
|
|
{ #category : #utility }
|
|
BreaWebsite >> baseRepoUrl [
|
|
^ 'http://mutabit.com/repos.fossil/gig/'
|
|
]
|
|
|
|
{ #category : #accessing }
|
|
BreaWebsite >> fossilRepo [
|
|
^ fossilRepo
|
|
]
|
|
|
|
{ #category : #accessing }
|
|
BreaWebsite >> fossilRepo: anObject [
|
|
fossilRepo := anObject
|
|
]
|