Replace lift with liftIO to match Pipes.Prelude and make it work with Pipes.Safe.bracket