Snoooopy/dtos-dotfiles
1
0
Fork 0
mirror of https://gitlab.com/dwt1/dotfiles.git synced 2026-04-23 03:20:26 +10:00
Code Issues Packages Projects Releases Wiki Activity

Adding nitrogen config.

Browse Source
This commit is contained in:
Derek Taylor
2020-12-21 15:01:47 -06:00
parent 21ab425b4b
commit 00fd6e0b50
5 changed files with 46 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
.xmonad/README.org
View File

@@ -169,16 +169,23 @@ These are commands we want XMonad to execute on startup, such as running a compo
#+BEGIN_SRC haskell
myStartupHook :: X ()
myStartupHook = do
spawnOnce "lxsession &"
spawnOnce "nitrogen --restore &"
spawnOnce "picom --experimental-backend &"
spawnOnce "picom --experimental-backends &"
spawnOnce "nm-applet &"
spawnOnce "volumeicon &"
spawnOnce "trayer --edge top --align right --widthtype request --padding 6 --SetDockType true --SetPartialStrut true --expand true --monitor 1 --transparent true --alpha 0 --tint 0x282c34 --height 22 &"
spawnOnce "/usr/bin/emacs --daemon &"
-- spawnOnce "kak -d -s mysession &"
spawnOnce "/usr/bin/emacs --daemon &" -- emacs daemon for the emacsclient
-- spawnOnce "kak -d -s mysession &" -- kakoune daemon for better performance
-- spawnOnce "urxvtd -q -o -f &" -- urxvt daemon for better performance
setWMName "LG3D"
#+END_SRC
#+RESULTS:
: Prelude> Prelude>
: <interactive>:26:11-19: error:
: Variable not in scope: setWMName :: [Char] -> t
* Gridselect
GridSelect displays items (programs, open windows, etc.) in a 2D grid and lets the user select from it with the cursor/hjkl keys or the mouse.
@@ -841,7 +848,6 @@ myShowWNameTheme = def
myLayoutHook = avoidStruts $ mouseResize $ windowArrange $ T.toggleLayouts floats
$ mkToggle (NBFULL ?? NOBORDERS ?? EOT) myDefaultLayout
where
-- I've commented out the layouts I don't use.
myDefaultLayout = tall
||| magnify
||| noBorders monocle

9
.xmonad/xmonad.hs
View File

@@ -113,13 +113,15 @@ windowCount = gets $ Just . show . length . W.integrate' . W.stack . W.workspace
myStartupHook :: X ()
myStartupHook = do
spawnOnce "lxsession &"
spawnOnce "nitrogen --restore &"
spawnOnce "picom --experimental-backend &"
spawnOnce "picom --experimental-backends &"
spawnOnce "nm-applet &"
spawnOnce "volumeicon &"
spawnOnce "trayer --edge top --align right --widthtype request --padding 6 --SetDockType true --SetPartialStrut true --expand true --monitor 1 --transparent true --alpha 0 --tint 0x282c34 --height 22 &"
spawnOnce "/usr/bin/emacs --daemon &"
-- spawnOnce "kak -d -s mysession &"
spawnOnce "/usr/bin/emacs --daemon &" -- emacs daemon for the emacsclient
-- spawnOnce "kak -d -s mysession &" -- kakoune daemon for better performance
-- spawnOnce "urxvtd -q -o -f &" -- urxvt daemon for better performance
setWMName "LG3D"
myColorizer :: Window -> Bool -> X (String, String)
@@ -716,7 +718,6 @@ myShowWNameTheme = def
myLayoutHook = avoidStruts $ mouseResize $ windowArrange $ T.toggleLayouts floats
$ mkToggle (NBFULL ?? NOBORDERS ?? EOT) myDefaultLayout
where
-- I've commented out the layouts I don't use.
myDefaultLayout = tall
||| magnify
||| noBorders monocle