optionalSettings name _ (Just (Custom val)) = Just (name, A.toJSON val)
optionalSettings name _ (Just (Custom val)) = Just (name, A.toJSON val)
optionalSettings name _ (Just (Custom val)) = Just (name, A.toJSON val)