Can't run example on page 64

[narley]

Hi.
I'm trying to run the examples on page 64 and commands fail:

> addAuth s auth ---> doesn't work
Worked if D.addAuth auth

findUserByAuth s auth ---> doesn't work
Tried with:
D.findUserByAuth s auth ----> doesn't work
D.findUserByAuth auth ----> doesn't work

[paulspencerwilliams]

With some help from the FP Slack community, I was pointed towards this code to resolve the first issue:

flip runReaderT s $ addAuth auth

which resolved the error

<interactive>:8:9: error:
    • Couldn't match expected type ‘D.Auth’
                  with actual type ‘TVar State’
    • In the first argument of ‘addAuth’, namely ‘s’
      In the expression: addAuth s auth
      In an equation for ‘it’: it = addAuth s auth