From 7c933642730dd5b935281f2cc938f2998e3a4114 Mon Sep 17 00:00:00 2001 From: Lia Lenckowski Date: Tue, 1 Aug 2023 01:29:48 +0200 Subject: more up-to-date-bangs (still not the most recent, but the most recent i could find without crawling duckduckgo a bunch) --- src/BangState.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/BangState.hs b/src/BangState.hs index fabd9e7..328a57e 100644 --- a/src/BangState.hs +++ b/src/BangState.hs @@ -70,7 +70,7 @@ loadOwnBangs = eitherDecodeFileStrict "bangs.json" <|> return (Left "") >>= \cas initBangState :: IO BangState initBangState = do -- TODO error handling for ddg bang polling, as well as regular polling - ans <- (httpJSON "https://duckduckgo.com/bang.v255.js") :: IO (Response DDGBangs) + ans <- (httpJSON "https://duckduckgo.com/bang.v260.js") :: IO (Response DDGBangs) s <- BangState <$> (loadOwnBangs >>= newTVarIO) <*> newTVarIO (toBangs $ getResponseBody ans) -- cgit v1.2.3-70-g09d2