Skip to content

Commit dd515d9

Browse files
committed
raise haddock coverage in Import module
1 parent 14201cd commit dd515d9

File tree

1 file changed

+2
-1
lines changed

1 file changed

+2
-1
lines changed

dhall/src/Dhall/Import.hs

Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -792,7 +792,7 @@ fetchFresh (Env env) = do
792792

793793
fetchFresh Missing = throwM (MissingImports [])
794794

795-
795+
-- | Fetch the text contents of a URL
796796
fetchRemote :: URL -> StateT Status IO Data.Text.Text
797797
#ifndef WITH_HTTP
798798
fetchRemote (url@URL { headers = maybeHeadersExpression }) = do
@@ -1079,6 +1079,7 @@ originHeadersLoader headersExpr = do
10791079
emptyStatus :: FilePath -> Status
10801080
emptyStatus = makeEmptyStatus defaultNewManager defaultOriginHeaders
10811081

1082+
-- | See 'emptyStatus'
10821083
emptyStatusWithManager
10831084
:: IO Manager
10841085
-> FilePath

0 commit comments

Comments
 (0)