diff options
author | Sibi Prabakaran <sibi@psibi.in> | 2020-08-09 13:09:38 +0530 |
---|---|---|
committer | Sibi Prabakaran <sibi@psibi.in> | 2020-08-09 13:09:51 +0530 |
commit | c6669e26e1ee9ef6ff9b0e5d2e85df15ad731140 (patch) | |
tree | 3d65ef1ded2aa80f0d405ebebd08c5c856bc8aeb /src/Xmobar/X11/MinXft.hsc | |
parent | 73e02934d68dfaf04bbb36dbb2e3b52b042c65bb (diff) | |
download | xmobar-c6669e26e1ee9ef6ff9b0e5d2e85df15ad731140.tar.gz xmobar-c6669e26e1ee9ef6ff9b0e5d2e85df15ad731140.tar.bz2 |
Update changelog and add comment
Diffstat (limited to 'src/Xmobar/X11/MinXft.hsc')
-rw-r--r-- | src/Xmobar/X11/MinXft.hsc | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Xmobar/X11/MinXft.hsc b/src/Xmobar/X11/MinXft.hsc index 22edf8f..d6861e6 100644 --- a/src/Xmobar/X11/MinXft.hsc +++ b/src/Xmobar/X11/MinXft.hsc @@ -161,12 +161,12 @@ withAXftDraw d p v c act = do foreign import ccall "XftDrawStringUtf8" cXftDrawStringUtf8 :: AXftDraw -> AXftColor -> AXftFont -> CInt -> CInt -> Ptr (#type FcChar8) -> CInt -> IO () +-- Fixes https://github.com/jaor/xmobar/issues/476 utf8EncodeString :: Num b => String -> [b] utf8EncodeString str = if UTF8.isUTF8Encoded str then map (fi . ord) str else map fi (UTF8.encode str) - drawXftString :: (Integral a1, Integral a) => AXftDraw -> AXftColor -> AXftFont -> a -> a1 -> String -> IO () drawXftString d c f x y string = |