From 6c055d89bdfd51eab7ba111a95dd55701d1c9888 Mon Sep 17 00:00:00 2001 From: Vidhu Kant Sharma Date: Mon, 30 Nov 2020 18:54:24 +0530 Subject: polished the bar and added it to XMonad autostarts --- XMonad/xmonad.hs | 15 ++++++--------- 1 file changed, 6 insertions(+), 9 deletions(-) (limited to 'XMonad/xmonad.hs') diff --git a/XMonad/xmonad.hs b/XMonad/xmonad.hs index a095e079..220cecf6 100644 --- a/XMonad/xmonad.hs +++ b/XMonad/xmonad.hs @@ -1,11 +1,5 @@ import XMonad import qualified XMonad.StackSet as W --- import XMonad hiding ((|||)) - --- for bar shit --- import Data.Time.Clock -import qualified XMonad.Util.ExtensibleState as XS -import XMonad.Util.Timer -- actions import XMonad.Actions.CycleWS (moveTo, shiftTo, WSType(..), nextScreen, prevScreen) @@ -47,11 +41,14 @@ import XMonad.Util.Run myStartupHook :: X () myStartupHook = do + spawnOnce "/home/zt/.xmonad/baraction | lemonbar -g 1366x21+0+0 -B '#171520' -F '#ffffff' -f 'Source Han Sans JP:size=10' -n 'XMobar'" + spawnOnce "/home/zt/.config/scripts/weather" spawnOnce "nitrogen --restore &" spawnOnce "picom &" spawnOnce "deadd-notification-center &" -- spawnOnce "firefox &" spawnOnce "sxhkd &" + spawnOnce "weather" spawnOnce "betterlockscreen -l -t 'Welcome, Vidhu Kant!'" setWMName "AnimeTits&ThighsWM" setDefaultCursor xC_left_ptr @@ -199,7 +196,7 @@ myLemonbarPP = def {ppCurrent = wrap "%{F#6c71c4}%{B#d33682}%{F-}" "%{F#d33682}% , ppWsSep = " " , ppHidden = wrap "%{B#268bd2}" "%{B-}" , ppHiddenNoWindows = wrap "%{F#02fc45}" "%{F-}" - , ppTitle = wrap " %{B#6c71c4}%{F#f0f0f0} " " %{B-}" . shorten 90 + , ppTitle = wrap " %{B#6c71c4}%{F#f0f0f0} " " %{B-}" . shorten 75 , ppUrgent = wrap "%{B#9cfc02} " " %{B-}%{F-}" , ppLayout = wrap "%{r}%{B#99B1D5}%{F#232627} " " %{B-} " , ppSep = " " @@ -208,7 +205,7 @@ myLemonbarPP = def {ppCurrent = wrap "%{F#6c71c4}%{B#d33682}%{F-}" "%{F#d33682}% } main = do - bar <- spawnPipe "lemonbar -b -g 1366x21 -B '#171520' -F '#ffffff' -f 'Source Han Sans JP:size=10' -o -3 -f 'RobotoMono Nerd Font:style=Regular:size=15' -f -n 'notXMobar' -o 0" + notXMobar <- spawnPipe "lemonbar -b -g 1366x21+0+0 -B '#171520' -F '#ffffff' -f 'Source Han Sans JP:size=10' -o -3 -f 'RobotoMono Nerd Font:style=Regular:size=15' -f -n 'notXMobar' -o 0" xmonad $ docks def { terminal = myTerminal, @@ -222,7 +219,7 @@ main = do layoutHook = myLayoutHook, -- manageHook = myManageHook, -- handleEventHook = myEventHook, - logHook = dynamicLogWithPP myLemonbarPP { ppOutput = \x -> hPutStrLn bar x}, + logHook = dynamicLogWithPP myLemonbarPP { ppOutput = \x -> hPutStrLn notXMobar x}, startupHook = myStartupHook } `additionalKeys` myKeys -- cgit v1.2.3