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

M src/Data/Text/ParagraphLayout/Plain.hs
M test/Data/Text/ParagraphLayout/PlainSpec.hs

@@ 72,11 72,12 @@ data ParagraphOptions = ParagraphOptions
 
 data LineHeight
 
-    = Absolute Int32
-    -- ^ Set line height independently of the font.
+    = Normal
+    -- ^ Determine the preferred line height automatically using its ascent and
+    -- descent metrics.
 
-    | Relative Float
-    -- ^ Set line height as a multiplier of the font's built-in value.
+    | Absolute Int32
+    -- ^ Set the preferred line height independently of the font.
 
 -- | The resulting layout of the whole paragraph.
 data ParagraphLayout = ParagraphLayout

@@ 71,7 71,7 @@ emptySpanLayout :: ParagraphLayout
 emptySpanLayout = ParagraphLayout (Rect 0 0 0 0) [SpanLayout []]
 
 opts :: Font -> ParagraphOptions
-opts font = ParagraphOptions font (Relative 1.5) 20000
+opts font = ParagraphOptions font Normal 20000
 
 spec :: Spec
 spec = do