From 460d25b80051d99ec17128dac4fd9253e99e7515 Mon Sep 17 00:00:00 2001 From: Ben Sima Date: Sat, 26 Jun 2021 07:46:31 -0400 Subject: Factor OAuth code into Biz.Auth --- Hero/Node.hs | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'Hero/Node.hs') diff --git a/Hero/Node.hs b/Hero/Node.hs index 5511942..f08732f 100644 --- a/Hero/Node.hs +++ b/Hero/Node.hs @@ -222,8 +222,10 @@ fetchComics = } sendLogin :: - Auth.Username -> - Auth.Password -> + -- | User + MisoString -> + -- | Password + MisoString -> IO ( Network.RemoteData MisoString -- cgit v1.2.3