twin/xmonad-contrib
1
0
Fork 0
mirror of https://github.com/xmonad/xmonad-contrib.git synced 2025-08-01 12:41:52 -07:00
Code Issues Packages Projects Releases Wiki Activity

XMonad.Util.Themes: Add adwaitaTheme and adwaitaDarkTheme

Browse Source
This commit is contained in:
Alex Griffin
2019-03-13 14:42:47 -05:00
parent c53436f3a6
commit bfb52a5025
2 changed files with 51 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
CHANGES.md
View File

@@ -71,6 +71,11 @@
Add a utility function `isOnAnyVisibleWS :: Query Bool` to allow easy Add a utility function `isOnAnyVisibleWS :: Query Bool` to allow easy
cycling between all windows on all visible workspaces. cycling between all windows on all visible workspaces.
* `XMonad.Util.Themes`
Add adwaitaTheme and adwaitaDarkTheme to match their respective
GTK themes.
## 0.15 ## 0.15

46
XMonad/Util/Themes.hs
View File

@@ -19,6 +19,8 @@ module XMonad.Util.Themes
, ppThemeInfo , ppThemeInfo
, xmonadTheme , xmonadTheme
, smallClean , smallClean
, adwaitaTheme
, adwaitaDarkTheme
, robertTheme , robertTheme
, darkTheme , darkTheme
, deiflTheme , deiflTheme
@@ -91,6 +93,8 @@ ppThemeInfo t = themeName t <> themeDescription t <> "by" <> themeAuthor t
listOfThemes :: [ThemeInfo] listOfThemes :: [ThemeInfo]
listOfThemes = [ xmonadTheme listOfThemes = [ xmonadTheme
, smallClean , smallClean
, adwaitaTheme
, adwaitaDarkTheme
, darkTheme , darkTheme
, deiflTheme , deiflTheme
, oxymor00nTheme , oxymor00nTheme
@@ -132,6 +136,48 @@ smallClean =
} }
} }
-- | Matching decorations for Adwaita GTK theme
adwaitaTheme :: ThemeInfo
adwaitaTheme =
newTheme { themeName = "adwaitaTheme"
, themeAuthor = "Alex Griffin"
, themeDescription = "Matching decorations for Adwaita GTK theme"
, theme = def { activeColor = "#dfdcd8"
, inactiveColor = "#f6f5f4"
, urgentColor = "#3584e4"
, activeBorderColor = "#bfb8b1"
, inactiveBorderColor = "#cdc7c2"
, urgentBorderColor = "#1658a7"
, activeTextColor = "#2e3436"
, inactiveTextColor = "#929595"
, urgentTextColor = "#ffffff"
, fontName = "xft:Cantarell:bold:size=11"
, decoWidth = 400
, decoHeight = 35
}
}
-- | Matching decorations for Adwaita-dark GTK theme
adwaitaDarkTheme :: ThemeInfo
adwaitaDarkTheme =
newTheme { themeName = "adwaitaDarkTheme"
, themeAuthor = "Alex Griffin"
, themeDescription = "Matching decorations for Adwaita-dark GTK theme"
, theme = def { activeColor = "#2d2d2d"
, inactiveColor = "#353535"
, urgentColor = "#15539e"
, activeBorderColor = "#070707"
, inactiveBorderColor = "#1c1c1c"
, urgentBorderColor = "#030c17"
, activeTextColor = "#eeeeec"
, inactiveTextColor = "#929291"
, urgentTextColor = "#ffffff"
, fontName = "xft:Cantarell:bold:size=11"
, decoWidth = 400
, decoHeight = 35
}
}
-- | Don's preferred colors - from DynamicLog...;) -- | Don's preferred colors - from DynamicLog...;)
donaldTheme :: ThemeInfo donaldTheme :: ThemeInfo
donaldTheme = donaldTheme =