From dc262d1628aa3e1bfe17ce99bfe89782b6185cc5 Mon Sep 17 00:00:00 2001 From: jao Date: Thu, 3 Feb 2022 05:14:45 +0000 Subject: TextOutputColor -> TextOutputFormat Thinking of eventually adding a Sway JSON output, or simply add fonts to Pango specification, so it's more than colors. Also, NoColors -> Plain. --- src/Xmobar/App/Opts.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/Xmobar/App/Opts.hs') diff --git a/src/Xmobar/App/Opts.hs b/src/Xmobar/App/Opts.hs index 2925d26..9f19ff6 100644 --- a/src/Xmobar/App/Opts.hs +++ b/src/Xmobar/App/Opts.hs @@ -61,7 +61,7 @@ options = , Option "r" ["recompile"] (NoArg Recompile) "Force recompilation" , Option "V" ["version"] (NoArg Version) "Show version information" , Option "T" ["text"] (OptArg TextOutput "color") - "Write text-only output to stdout. NoColors/Ansi/Pango" + "Write text-only output to stdout. Plain/Ansi/Pango" , Option "f" ["font"] (ReqArg Font "font name") "Font name" , Option "N" ["add-font"] (ReqArg AddFont "font name") "Add to the list of additional fonts" @@ -136,7 +136,7 @@ doOpts conf (o:oo) = Recompile -> doOpts' conf TextOutput s -> doOpts' $ case s of Just fmt -> conf {textOutput = True, - textOutputColors = read fmt} + textOutputFormat = read fmt} Nothing -> conf {textOutput = True} Verbose -> doOpts' (conf {verbose = True}) Font s -> doOpts' (conf {font = s}) -- cgit v1.2.3