on master help sign in
Config: make Semigroup instance take disjunction of allowCustomUnicodeWithTables values
commit59f90de8b207b3328886a36d1cb3cde23cc11dd3 authorJonathan Daugherty <cygnus@foobox.com> dateTue 3 Mar 2020, 09:06 (7 years ago) parent9737f2b
1 file changed+2−1
src/Graphics/Vty/Config.hs+2−1
src/Graphics/Vty/Config.hs+2−1
@@ -168,7 +168,8 @@ instance Semigroup Config where
168168 , outputFd = outputFd c1 <|> outputFd c0
169169 , termName = termName c1 <|> termName c0
170170 , termWidthMaps = termWidthMaps c1 <|> termWidthMaps c0
171− , allowCustomUnicodeWithTables = allowCustomUnicodeWithTables c1
171+ , allowCustomUnicodeWithTables =
172+ allowCustomUnicodeWithTables c0 || allowCustomUnicodeWithTables c1
172173 }
173174
174175instance Monoid Config where