Now using liftIO instead of lift, which is better style (although not
necessary here).