Replace withBackend with nestBackend

nestBackend knows how to correctly embed the IO into a Snap Handler,
and removes the duplicated lift/liftIO calls.