diff --git a/repository/Brea/BreaMember.class.st b/repository/Brea/BreaMember.class.st
index 5dcd379..6758e62 100644
--- a/repository/Brea/BreaMember.class.st
+++ b/repository/Brea/BreaMember.class.st
@@ -65,8 +65,8 @@ BreaMember >> email [
]
{ #category : #accessing }
-BreaMember >> email: anObject [
- email := anObject
+BreaMember >> email: anEmailAddress [
+ email := (SHA1 new hashMessage: anEmailAddress) hex
]
{ #category : #accessing }
@@ -76,7 +76,9 @@ BreaMember >> facebook [
{ #category : #accessing }
BreaMember >> facebook: aProfileName [
- self webPresence facebook: aProfileName
+ aProfileName = ''
+ ifTrue: [ self webPresence facebook: nil ]
+ ifFalse: [ self webPresence facebook: aProfileName ]
]
{ #category : #public }
@@ -221,9 +223,13 @@ BreaMember >> htmlInput [
+ [*]Organization(s) (separated with commas)
Letters and spaces only
+
+
+
+
@@ -325,6 +331,12 @@ BreaMember >> instagram: aProfileName [
self webPresence instagram: aProfileName
]
+{ #category : #accessing }
+BreaMember >> memberOf: anOrgName [
+ self organizations add:
+ (BreaOrganization new name: anOrgName)
+]
+
{ #category : #accessing }
BreaMember >> memberOf: anOrgName withWebsite: aUrl [
self organizations add:
@@ -339,8 +351,8 @@ BreaMember >> organizations [
]
{ #category : #accessing }
-BreaMember >> organizations: anObject [
- organizations := anObject
+BreaMember >> organizations: anOrgListOrName [
+ anOrgListOrName splitOn: ',' do: [ :each | self memberOf: each ]
]
{ #category : #public }
@@ -410,7 +422,9 @@ BreaMember >> twitter [
{ #category : #accessing }
BreaMember >> twitter: aProfileName [
- self webPresence twitter: aProfileName
+ aProfileName = ''
+ ifTrue: [ self webPresence twitter: nil ]
+ ifFalse: [ self webPresence twitter: aProfileName ]
]
{ #category : #public }
diff --git a/repository/Brea/BreaWebsite.class.st b/repository/Brea/BreaWebsite.class.st
index 6dfdd19..8baacd4 100644
--- a/repository/Brea/BreaWebsite.class.st
+++ b/repository/Brea/BreaWebsite.class.st
@@ -34,6 +34,9 @@ BreaWebsite >> processNewMember: request [
familyName: (request at: #familyName);
email: (request at: #email);
country: (request at: #country);
+ organizations: (request at: #organizations);
+ picture: (request at: #picture);
+ website: (request at: #website);
twitter: (request at: #twitter);
facebook: (request at: #facebook);
tags: (request at: #tags).