diff options
| author | jao <jao@gnu.org> | 2018-07-10 16:21:26 +0100 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2018-07-10 16:23:11 +0100 |
| commit | a2365debfaba478042184f5831675d1b08172cc7 (patch) | |
| tree | abb4b37777ab965303b0a4a974d5dea9956af9d8 /src/XUtil.hsc | |
| parent | 741b803b943430a262ec36658b13830733e17b48 (diff) | |
| download | xmobar-a2365debfaba478042184f5831675d1b08172cc7.tar.gz xmobar-a2365debfaba478042184f5831675d1b08172cc7.tar.bz2 | |
New configuration parameter `textOffsets` (fixes #311)
Diffstat (limited to 'src/XUtil.hsc')
| -rw-r--r-- | src/XUtil.hsc | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/XUtil.hsc b/src/XUtil.hsc index 9063147..dcca342 100644 --- a/src/XUtil.hsc +++ b/src/XUtil.hsc @@ -1,7 +1,7 @@ ----------------------------------------------------------------------------- -- | -- Module : XUtil --- Copyright : (C) 2011, 2012, 2013, 2014, 2015, 2017 Jose Antonio Ortega Ruiz +-- Copyright : (C) 2011, 2012, 2013, 2014, 2015, 2017, 2018 Jose Antonio Ortega Ruiz -- (C) 2007 Andrea Rossato -- License : BSD3 -- @@ -77,7 +77,7 @@ data XFont = Core FontStruct -- | When initFont gets a font name that starts with 'xft:' it switchs -- to the Xft backend Example: 'xft:Sans-10' -initFont :: Display ->String -> IO XFont +initFont :: Display -> String -> IO XFont initFont d s = let xftPrefix = "xft:" in if xftPrefix `isPrefixOf` s then |