diff options
Diffstat (limited to 'src/Main.hs')
-rw-r--r-- | src/Main.hs | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/src/Main.hs b/src/Main.hs index aa6ac1d..5ef5db6 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -100,7 +100,6 @@ data Opts = Help | FgColor String | T | B - | D | AlignSep String | Commands String | AddCommand String @@ -118,7 +117,6 @@ options = , Option ['F' ] ["fgcolor" ] (ReqArg FgColor "fg color" ) "The foreground color. Default grey" , Option ['o' ] ["top" ] (NoArg T ) "Place xmobar at the top of the screen" , Option ['b' ] ["bottom" ] (NoArg B ) "Place xmobar at the bottom of the screen" - , Option ['d' ] ["dock" ] (NoArg D ) "Place xmobar in the dock" , Option ['a' ] ["alignsep" ] (ReqArg AlignSep "alignsep" ) "Separators for left, center and right text\nalignment. Default: '}{'" , Option ['s' ] ["sepchar" ] (ReqArg SepChar "char" ) "The character used to separate commands in\nthe output template. Default '%'" , Option ['t' ] ["template" ] (ReqArg Template "template" ) "The output template" @@ -164,7 +162,6 @@ doOpts conf (o:oo) = FgColor s -> doOpts (conf {fgColor = s }) oo T -> doOpts (conf {position = Top }) oo B -> doOpts (conf {position = Bottom}) oo - D -> doOpts (conf {position = Docked}) oo AlignSep s -> doOpts (conf {alignSep = s }) oo SepChar s -> doOpts (conf {sepChar = s }) oo Template s -> doOpts (conf {template = s }) oo |