[Haskell-beginners] Trouble with liftIO in ReaderT