55 lines
880 B
Smalltalk
55 lines
880 B
Smalltalk
"
|
|
I store the common forms of web presence a BreaMember can have online.
|
|
"
|
|
Class {
|
|
#name : #BreaWebPresence,
|
|
#superclass : #Object,
|
|
#instVars : [
|
|
'website',
|
|
'twitter',
|
|
'facebook',
|
|
'instagram'
|
|
],
|
|
#category : #Brea
|
|
}
|
|
|
|
{ #category : #accessing }
|
|
BreaWebPresence >> facebook [
|
|
^ facebook
|
|
]
|
|
|
|
{ #category : #accessing }
|
|
BreaWebPresence >> facebook: anObject [
|
|
facebook := anObject
|
|
]
|
|
|
|
{ #category : #accessing }
|
|
BreaWebPresence >> instagram [
|
|
^ instagram
|
|
]
|
|
|
|
{ #category : #accessing }
|
|
BreaWebPresence >> instagram: anObject [
|
|
instagram := anObject
|
|
]
|
|
|
|
{ #category : #accessing }
|
|
BreaWebPresence >> twitter [
|
|
^ twitter
|
|
]
|
|
|
|
{ #category : #accessing }
|
|
BreaWebPresence >> twitter: anObject [
|
|
twitter := anObject
|
|
]
|
|
|
|
{ #category : #accessing }
|
|
BreaWebPresence >> website [
|
|
^ website
|
|
]
|
|
|
|
{ #category : #accessing }
|
|
BreaWebPresence >> website: anObject [
|
|
website := anObject
|
|
]
|