Simplify code

jfmengels · Apr 24, 2021 · 442fe10 · 442fe10
1 parent c7c7df3
commit 442fe10
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/src/NoUnused/CustomTypeConstructorArgs.elm b/src/NoUnused/CustomTypeConstructorArgs.elm
@@ -531,8 +531,7 @@ collectUsedCustomTypeArgs lookupTable (Node range pattern) =
             in
             case ModuleNameLookupTable.moduleNameAt lookupTable range of
                 Just moduleName ->
-                    [ ( ( moduleName, name ), usedPositions ) ]
-                        ++ subList
+                    ( ( moduleName, name ), usedPositions ) :: subList
 
                 Nothing ->
                     subList