diff --git a/elm/src/Main.elm b/elm/src/Main.elm
index fad749a..21771b4 100644
--- a/elm/src/Main.elm
+++ b/elm/src/Main.elm
@@ -354,6 +354,8 @@ getLastListItem myList =
             { time = 0, epa = 0, pm25 = 0, pm10 = 0 }
 
 
+{-| Convert HTTP error to a string.
+-}
 errorToString : Http.Error -> String
 errorToString error =
     case error of
@@ -379,6 +381,8 @@ errorToString error =
             errorMessage
 
 
+{-| Conditionally display some block of HTML
+-}
 htmlIf : Html msg -> Bool -> Html msg
 htmlIf el cond =
     if cond then