Failing test case for #249
Hoist out a liftIO