diff --git a/lib/GEODE/Metadata/Contrastive.hs b/lib/GEODE/Metadata/Contrastive.hs
index b044e0c84ae7141d943f6f47351fe85ef40de193..28f07ef5ff2f0b82ca537234dc7295739f979a9e 100644
--- a/lib/GEODE/Metadata/Contrastive.hs
+++ b/lib/GEODE/Metadata/Contrastive.hs
@@ -13,6 +13,10 @@ import GHC.Generics (Generic)
 newtype MultiText = MultiText
   { getList :: [Text] } deriving (Show)
 
+-- | We represent fields with multiple values by ':'-surrounded values
+-- (including a leading and trailing ':') to be able to always write the same
+-- regex to match for their value (/.*:Géographie:.*/, no matter if it occurs at
+-- the begining, the end or in the middle of the field
 formatList :: MultiText -> Text
 formatList = colonFormat . getList
   where