on master help sign in
Naming nit
commitc1e534b991ea4551d9eca47914112de9e6889645 authorJonathan Daugherty <cygnus@foobox.com> dateTue 3 Mar 2020, 16:18 (7 years ago) parente07f287
1 file changed+3−3
src/Graphics/Vty.hs+3−3
src/Graphics/Vty.hs+3−3
@@ -126,14 +126,14 @@ mkVty appConfig = do
126126 config <- (<> appConfig) <$> userConfig
127127
128128 when (allowCustomUnicodeWidthTables config /= Just False) $
129− installWidthTable config
129+ installCustomWidthTable config
130130
131131 input <- inputForConfig config
132132 out <- outputForConfig config
133133 internalMkVty input out
134134
135−installWidthTable :: Config -> IO ()
136−installWidthTable c = do
135+installCustomWidthTable :: Config -> IO ()
136+installCustomWidthTable c = do
137137 let doLog s = case debugLog c of
138138 Nothing -> return ()
139139 Just path -> appendFile path $ "installWidthTable: " <> s <> "\n"