Correcting storage scope example
commit48c3cb5e06cd4fed7d4f215c71d26498cbda9427
authorBrendan Hay <brendan.g.hay@gmail.com>
dateTue 10 May 2016, 16:17 (10 years ago)
parent1cd64dc
examples/src/Example/Storage.hs+1−1
@@ -20,7 +20,7 @@ import System.IO
2020example :: Text -> FilePath -> IO ()
2121example bkt f = do
2222 l <- newLogger Debug stdout
23− e <- newEnv <&> (envLogger .~ l) . allow devstorageReadWriteScope
23+ e <- newEnv <&> (envLogger .~ l) . allow storageReadWriteScope
2424 b <- sourceBody f
2525
2626 let key = Text.pack f