From e8c1c6adb1b6a7c30c1f7e197832ccf6895ddce7 Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Fri, 11 Feb 2022 09:29:55 -0800
Subject: [PATCH] Clean up import list.

---
 src/Text/Pandoc/Writers/Docx/Table.hs | 35 ++++++++++++++++++++++-----
 1 file changed, 29 insertions(+), 6 deletions(-)

diff --git a/src/Text/Pandoc/Writers/Docx/Table.hs b/src/Text/Pandoc/Writers/Docx/Table.hs
index af5bcadcb..02fa5c63e 100644
--- a/src/Text/Pandoc/Writers/Docx/Table.hs
+++ b/src/Text/Pandoc/Writers/Docx/Table.hs
@@ -13,19 +13,42 @@ module Text.Pandoc.Writers.Docx.Table
   ( tableToOpenXML
   ) where
 
-import Control.Monad.State.Strict
-import Data.Array
+import Control.Monad.State.Strict ( modify, gets, unless )
+import Data.Array ( elems, (!), assocs, indices )
 import Data.Text (Text)
 import Text.Pandoc.Definition
+    ( ColSpec,
+      Caption(Caption),
+      Format(Format),
+      Attr,
+      Block(Para, Plain),
+      Inline(Str, Span, RawInline),
+      Alignment(..),
+      RowSpan(..),
+      ColSpan(..),
+      ColWidth(ColWidth) )
 import Text.Pandoc.Class.PandocMonad (PandocMonad, translateTerm)
 import Text.Pandoc.Writers.Docx.Types
-import Text.Pandoc.Shared
+    ( WS,
+      WriterState(stNextTableNum, stInTable),
+      setFirstPara,
+      pStyleM,
+      withParaProp,
+      withParaPropM )
+import Text.Pandoc.Shared ( tshow, stringify )
 import Text.Pandoc.Options (WriterOptions, isEnabled)
 import Text.Pandoc.Extensions (Extension(Ext_native_numbering))
 import Text.Printf (printf)
-import Text.Pandoc.Writers.GridTable hiding (Table)
-import Text.Pandoc.Writers.OOXML
-import Text.Pandoc.XML.Light as XML hiding (Attr)
+import Text.Pandoc.Writers.GridTable
+    ( rowArray,
+      ColIndex,
+      GridCell(..),
+      Part(Part, partCellArray, partRowAttrs),
+      RowIndex )
+import Text.Pandoc.Writers.OOXML ( mknode )
+import Text.Pandoc.XML.Light.Proc ( onlyElems )
+import Text.Pandoc.XML.Light.Types
+    ( Content(Elem), Element(elName), QName(qName) )
 import qualified Data.Text as T
 import qualified Text.Pandoc.Translations as Term
 import qualified Text.Pandoc.Writers.GridTable as Grid