diff --git a/.hlint.yaml b/.hlint.yaml
index f700195..91b4fa0 100644
--- a/.hlint.yaml
+++ b/.hlint.yaml
@@ -1,3 +1,8 @@
+---
+- ignore:
+    # https://github.com/ndmitchell/hlint/issues/427
+    name: Eta reduce
+    within: authOAuth2
 - ignore:
     name: Redundant do
     within: spec
diff --git a/src/Yesod/Auth/OAuth2/EveOnline.hs b/src/Yesod/Auth/OAuth2/EveOnline.hs
index 666d9ec..2a5fb7c 100644
--- a/src/Yesod/Auth/OAuth2/EveOnline.hs
+++ b/src/Yesod/Auth/OAuth2/EveOnline.hs
@@ -96,7 +96,7 @@ oauth2EveScoped clientId clientSecret scopes widget =
 
 fetchEveProfile :: Manager -> OAuth2Token -> IO (Creds m)
 fetchEveProfile manager token = do
-    userResult <- authGetJSON manager (accessToken token) $ "https://login.eveonline.com/oauth/verify"
+    userResult <- authGetJSON manager (accessToken token) "https://login.eveonline.com/oauth/verify"
 
     case userResult of
         Right user -> return $ toCreds user token
diff --git a/src/Yesod/Auth/OAuth2/Salesforce.hs b/src/Yesod/Auth/OAuth2/Salesforce.hs
index 3ad1c7a..dd5102f 100644
--- a/src/Yesod/Auth/OAuth2/Salesforce.hs
+++ b/src/Yesod/Auth/OAuth2/Salesforce.hs
@@ -95,7 +95,7 @@ oauth2SalesforceSandboxScoped scopes clientId clientSecret =
 
 fetchSalesforceSandboxUser :: Manager -> OAuth2Token -> IO (Creds m)
 fetchSalesforceSandboxUser manager token = do
-    result <- authGetJSON manager (accessToken token) $ "https://test.salesforce.com/services/oauth2/userinfo"
+    result <- authGetJSON manager (accessToken token) "https://test.salesforce.com/services/oauth2/userinfo"
     case result of
         Right user -> return $ toCreds svcNameSb user token
         Left err -> throwIO $ invalidProfileResponse svcNameSb err