Commit 1a816fff authored by Bas Lijnse's avatar Bas Lijnse

Merge branch '171-basicapiexamples-sometimes-segfaults' into 'master'

made 'sharedStore' version specific

Closes #171

See merge request !95
parents e7df023e 204d6f17
......@@ -26,7 +26,7 @@ where
sharedStore :: !String !a -> SDS () a a | JSONEncode{|*|}, JSONDecode{|*|}, TC a
sharedStore storeId defaultV
= sdsFocus storeId (storeShare NS_APPLICATION_SHARES False InJSONFile (Just defaultV))
= sdsFocus storeId (storeShare NS_APPLICATION_SHARES True InJSONFile (Just defaultV))
storeNamespaces :: SDS () [String] ()
storeNamespaces = createReadOnlySDS read
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment