diff options
| author | Josh Rahm <joshuarahm@gmail.com> | 2022-03-28 22:57:25 -0600 |
|---|---|---|
| committer | Josh Rahm <joshuarahm@gmail.com> | 2022-03-28 22:57:29 -0600 |
| commit | 2a9c5414ffef1544cb0c7bd05e5a2f58ece064e6 (patch) | |
| tree | cf6ab07743cfaaccb56a4125abca1ce62f0a52f8 /src/Main.hs | |
| parent | 6da70d9ad5c815a4cc185909434497350c14edbe (diff) | |
| download | rde-2a9c5414ffef1544cb0c7bd05e5a2f58ece064e6.tar.gz rde-2a9c5414ffef1544cb0c7bd05e5a2f58ece064e6.tar.bz2 rde-2a9c5414ffef1544cb0c7bd05e5a2f58ece064e6.zip | |
Add firefox to the browsers list
Diffstat (limited to 'src/Main.hs')
| -rw-r--r-- | src/Main.hs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/Main.hs b/src/Main.hs index 0018fa2..44fb358 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -23,7 +23,6 @@ import Internal.RebindKeys import qualified XMonad as X import qualified XMonad.StackSet as W - main = do -- Execute some commands. @@ -37,7 +36,9 @@ main = do (=<<) X.xmonad $ applyKeys $ ewmh $ docks $ windowHooks (composeAll [ - (className =? "Google-chrome" <||> className =? "Brave-browser") --> composeAll [ + let browsers = ["Google-chrome", "Brave-browser", "firefox-default"] in + + (flip elem browsers <$> className) --> composeAll [ -- The geniuses that made chrome decided that Ctrl+W should kill -- the current tab! This makes it consistent with the rest of the -- world ... ctrl+w deletes the last word (ctrl+backspace). |