i gotta go
This commit is contained in:
parent
1885f46b79
commit
ce3e6a9f95
1 changed files with 6 additions and 2 deletions
|
@ -13,9 +13,13 @@ import Data.Monoid
|
||||||
import System.Exit
|
import System.Exit
|
||||||
import System.IO
|
import System.IO
|
||||||
|
|
||||||
|
-- Das Ist Xmobar
|
||||||
|
import XMonad.Hooks.StatusBar
|
||||||
|
import XMonad.Hooks.StatusBar.PP
|
||||||
|
import XMonad.Hooks.ManageDocks -- manage dock thingy xmobar hHAUISHFOAUISHDFUOIAS
|
||||||
|
|
||||||
-- Extras
|
-- Extras
|
||||||
import XMonad.Hooks.DynamicLog -- forgot what this was for lmao
|
import XMonad.Hooks.DynamicLog -- forgot what this was for lmao
|
||||||
import XMonad.Hooks.ManageDocks -- manage dock thingy xmobar hHAUISHFOAUISHDFUOIAS
|
|
||||||
import XMonad.Util.SpawnOnce -- for startup items
|
import XMonad.Util.SpawnOnce -- for startup items
|
||||||
import XMonad.Util.Run -- for xmobar startup
|
import XMonad.Util.Run -- for xmobar startup
|
||||||
|
|
||||||
|
@ -259,7 +263,7 @@ myStartupHook = do
|
||||||
--
|
--
|
||||||
main = do
|
main = do
|
||||||
h <- spawnPipe "xmobar"
|
h <- spawnPipe "xmobar"
|
||||||
xmonad defaults {
|
xmonad $ defaults $ xmobarProp {
|
||||||
logHook = myLogHook h
|
logHook = myLogHook h
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
Loading…
Reference in a new issue