on master help sign in
Config: make Semigroup instance take disjunction of allowCustomUnicodeWithTables values
59f90deJonathan Daugherty
src/Graphics/Vty/Config.hs+2−1
@@ -168,7 +168,8 @@ instance Semigroup Config where
168 , outputFd = outputFd c1 <|> outputFd c0
168 , outputFd = outputFd c1 <|> outputFd c0
169 , termName = termName c1 <|> termName c0
169 , termName = termName c1 <|> termName c0
170 , termWidthMaps = termWidthMaps c1 <|> termWidthMaps c0
170 , termWidthMaps = termWidthMaps c1 <|> termWidthMaps c0
171− , allowCustomUnicodeWithTables = allowCustomUnicodeWithTables c1
171+ , allowCustomUnicodeWithTables =
172+ allowCustomUnicodeWithTables c0 || allowCustomUnicodeWithTables c1
172 }
173 }
173
174
174instance Monoid Config where
175instance Monoid Config where