Fix #454, Remove (..) from types in @docs

src/ElmFormat/Render/Box.hs

@@ -700,7 +700,18 @@ formatModuleDocs elmVersion importInfo blocks =
 
         content :: String
         content =
-            ElmFormat.Render.Markdown.formatMarkdown (fmap format . parse) blocks
+            ElmFormat.Render.Markdown.formatMarkdown (fmap format . parse) $ fmap cleanBlock blocks
+
+        cleanBlock :: Markdown.Block -> Markdown.Block
+        cleanBlock block =
+            case block of
+                Markdown.ElmDocs docs ->
+                    Markdown.ElmDocs $
+                        (fmap . fmap)
+                            (Text.replace (Text.pack "(..)") (Text.pack ""))
+                            docs
+                _ ->
+                    block
     in
         formatDocComment content
 

tests/test-files/transform/DocCommentAtDocs.elm

@@ -1,11 +1,12 @@
-module DocCommentAtDocs exposing (x, y, z)
+module DocCommentAtDocs exposing (x, y, z, T(..))
 
 {-|
 
 @docs
  x,
    y,
  z
+@docs T(..)
 
 @docs a  , b  ,   c    
 @docs d

tests/test-files/transform/DocCommentAtDocs.formatted.elm

@@ -2,13 +2,15 @@ module DocCommentAtDocs exposing
     ( x
     , y
     , z
+    , T(..)
     )
 
 {-|
 
 @docs x
 @docs y
 @docs z
+@docs T
 
 @docs a, b, c
 @docs d