liftError :: ExceptT String IO a -> IO a
liftError = runExceptT >=> either fail return
liftError :: ExceptT String IO a -> IO a
liftError = runExceptT >=> either fail return
liftError = runExceptT >=> either fail return