-------------------------------------------------------------------------------


-- | Convenience function for when you don't have an externally
-- configured manager and want to create one on the spot.
withWU :: ManagerSettings -> APIKey -> WU IO a -> IO a
withWU ms k f = withManager ms $ \mgr -> do
  let conf = defaultWUConfig mgr k
  runWU conf f


-------------------------------------------------------------------------------
withWU :: ManagerSettings -> APIKey -> WU IO a -> IO a
withWU ms k f = withManager ms $ \mgr -> do
  let conf = defaultWUConfig mgr k
  runWU conf f


-------------------------------------------------------------------------------
withWU ms k f = withManager ms $ \mgr -> do
  let conf = defaultWUConfig mgr k
  runWU conf f


-------------------------------------------------------------------------------