8 lines
240 B
Smalltalk
8 lines
240 B
Smalltalk
accessing
|
|
store
|
|
ReStore isConnected ifFalse: [ self class storeDB]. "Starting the ReStore singleton."
|
|
self messages do: [:each | ReStore evaluateAsTransaction: [
|
|
each store.
|
|
each user isInDB ifFalse: [ each user store ]
|
|
]
|
|
]. |