3 files changed, 5 insertions(+), 6 deletions(-)

M src/Data/Text/ParagraphLayout/Internal/ParagraphConstruction.hs
M src/Data/Text/ParagraphLayout/Internal/Run.hs
M test/Data/Text/ParagraphLayout/SpanData.hs

@@ 12,10 12,8 @@ import Data.Text.Internal (Text (Text))
 import Data.Text.Internal.Lazy (chunk, empty)
 import qualified Data.Text.Internal.Lazy as Lazy
 import Data.Text.Lazy (toStrict)
+
 import Data.Text.ParagraphLayout.Internal.Plain
-    ( Paragraph (Paragraph)
-    , ParagraphOptions
-    )
 import Data.Text.ParagraphLayout.Internal.Span (Span (Span), SpanOptions)
 
 -- | Create first span with optional ignored suffix.

@@ 10,7 10,7 @@ import Data.Text.Glyphize (Direction (..))
 import qualified Data.Text.ICU.Char as ICUChar
 
 import Data.Text.ParagraphLayout.Internal.ResolvedSpan
-import Data.Text.ParagraphLayout.Internal.Script (charScript)
+import Data.Text.ParagraphLayout.Internal.Script
 import Data.Text.ParagraphLayout.Internal.TextContainer
 import Data.Text.ParagraphLayout.Internal.Zipper
 

@@ 7,8 7,9 @@ where
 
 import Data.Text (pack)
 import Data.Text.Glyphize (Font)
-import Data.Text.ParagraphLayout (LineHeight (Normal))
-import Data.Text.ParagraphLayout.Internal.ResolvedSpan (ResolvedSpan (..))
+
+import Data.Text.ParagraphLayout.Internal.LineHeight
+import Data.Text.ParagraphLayout.Internal.ResolvedSpan
 
 emptySpan :: Font -> ResolvedSpan
 emptySpan font = ResolvedSpan