diff options
| author | jao <jao@gnu.org> | 2022-09-12 04:01:51 +0100 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2022-09-12 04:01:51 +0100 |
| commit | 15c373076dec81c3245e42250512dea6a75db5e9 (patch) | |
| tree | c10be286b9e477137a53b4b63fe4148be7f0f6c1 /src/Xmobar/Config/Parse.hs | |
| parent | eaf2be9bbcf1b0597a52b14d28e0252ec4714bee (diff) | |
| download | xmobar-15c373076dec81c3245e42250512dea6a75db5e9.tar.gz xmobar-15c373076dec81c3245e42250512dea6a75db5e9.tar.bz2 | |
cairo: with_xft deprecated, with_cairo synomym
Diffstat (limited to 'src/Xmobar/Config/Parse.hs')
| -rw-r--r-- | src/Xmobar/Config/Parse.hs | 11 |
1 files changed, 1 insertions, 10 deletions
diff --git a/src/Xmobar/Config/Parse.hs b/src/Xmobar/Config/Parse.hs index 65e1af8..41088e9 100644 --- a/src/Xmobar/Config/Parse.hs +++ b/src/Xmobar/Config/Parse.hs @@ -26,16 +26,7 @@ import Data.Functor ((<&>)) import Xmobar.Config.Types -#ifdef XFT import qualified System.IO as S (readFile) -#endif - -readFileSafe :: FilePath -> IO String -#ifdef XFT -readFileSafe = S.readFile -#else -readFileSafe = readFile -#endif stripComments :: String -> String stripComments = @@ -182,4 +173,4 @@ commandsErr = "commands: this usually means that a command could not" ++ -- parsed. readConfig :: Config -> FilePath -> IO (Either ParseError (Config,[String])) readConfig defaultConfig f = - liftIO (readFileSafe f) <&> parseConfig defaultConfig + liftIO (S.readFile f) <&> parseConfig defaultConfig |