suntheme/app/Getters.hs

8 lines
185 B
Haskell
Raw Normal View History

module Getters where
import Control.Exception (SomeException, try)
import Network.HTTP.Request (Response, get)
fetch :: String -> IO (Either SomeException Response)
fetch = try . get