Correcting example scope usage
commitf2ead7e934c073777d000e3de082abed9bf9a88c
authorBrendan Hay <brendan.g.hay@gmail.com>
dateMon 21 Mar 2016, 21:42 (11 years ago)
parent954bdbc
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 authDevstorageReadWriteScope
2424 b <- sourceBody f
2525
2626 let key = Text.pack f