diff --git a/src/DiffSummary.hs b/src/DiffSummary.hs
index 8a9ac7ad5..abf7d14f7 100644
--- a/src/DiffSummary.hs
+++ b/src/DiffSummary.hs
@@ -165,8 +165,7 @@ toTermName source term = case unwrap term of
   S.Indexed children -> fromMaybe "branch" $ (toCategoryName . category) . extract <$> head children
   Leaf leaf -> toCategoryName leaf
   S.Assignment identifier _ -> toTermName' identifier
-  S.Function identifier _ _ ->
-    toTermName' identifier
+  S.Function identifier _ _ -> toTermName' identifier
   S.FunctionCall i args -> case unwrap i of
     S.AnonymousFunction params _ ->
       -- Omit a function call's arguments if it's arguments match the underlying