customMetadata (Just val) = Map.foldrWithKey (\k v xs -> (k .= v):xs) [] val
customMetadata (Just val) = Map.foldrWithKey (\k v xs -> (k .= v):xs) [] val
customMetadata (Just val) = Map.foldrWithKey (\k v xs -> (k .= v):xs) [] val