fix

2023-12-31 08:42:02 +03:00 · 2023-12-31 08:42:02 +03:00 · 8cfc1272bb
parent e466a5dd9f
commit 8cfc1272bb
1 changed files with 1 additions and 1 deletions
--- a/lib/Data/Config/Suckless/KeyValue.hs
+++ b/lib/Data/Config/Suckless/KeyValue.hs
@ -71,7 +71,7 @@ instance {-# OVERLAPPABLE #-} (HasConf m, HasCfgKey a (Maybe Value) m) => HasCfg
                | ListVal (Key s [v@ListVal{}]) <- syn, s == key @a @(Maybe Value) @m
                ]

-instance {-# OVERLAPPABLE #-} (HasConf m, Ord b, IsString b, HasCfgKey a (Maybe b) m) => HasCfgValue a (Maybe b) m where
+instance {-# OVERLAPPABLE #-} (HasConf m, IsString b, HasCfgKey a (Maybe b) m) => HasCfgValue a (Maybe b) m where
  cfgValue = lastMay . val <$> getConf
    where
      val syn = [ fromString (show $ pretty e)