From 18fffd492fe7134ef1cc53e1725d1709ddbde20b Mon Sep 17 00:00:00 2001
From: tv <tv@krebsco.de>
Date: Fri, 6 Mar 2026 23:32:59 +0100
Subject: HyphenateSegments: Hyphenator -> Language

This way we don't need to define bad orphan instances.
---
 src/TextViewport/Buffer/Item.hs | 8 +-------
 1 file changed, 1 insertion(+), 7 deletions(-)

(limited to 'src/TextViewport/Buffer')

diff --git a/src/TextViewport/Buffer/Item.hs b/src/TextViewport/Buffer/Item.hs
index b08aaf4..81d18ef 100644
--- a/src/TextViewport/Buffer/Item.hs
+++ b/src/TextViewport/Buffer/Item.hs
@@ -15,13 +15,7 @@ data SegmentStrategy
   = NoSegments
   | FixedWidthSegments
   | HyphenateSegments
-      { hsDict  :: H.Hyphenator
+      { hsLang  :: H.Language
       , hsCache :: HM.HashMap Text [(Text, Text)]
       }
   deriving (Eq, Show)
-
-instance Show H.Hyphenator where
-  show _ = "<Hyphenator>"
-
-instance Eq H.Hyphenator where
-  a == b =  False
-- 
cgit v1.2.3