ndwarshuis
/
xmonad-config
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

FIX vpn state init

This commit is contained in:
Nathan Dwarshuis 2023-01-03 22:28:34 -05:00
parent a0cdcce146
commit 003b0ce937
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lib/Xmobar/Plugins/VPN.hs
View File

@ -34,7 +34,7 @@ instance Exec VPN where
start (VPN (text, colors)) cb = start (VPN (text, colors)) cb =
withDBusClientConnection cb "VPN" $ \c -> do withDBusClientConnection cb "VPN" $ \c -> do
let dpy = displayMaybe cb iconFormatter . Just =<< readState let dpy = displayMaybe cb iconFormatter . Just =<< readState
s <- newMVar S.empty s <- newEmptyMVar
mapRIO (VEnv c s dpy) $ do mapRIO (VEnv c s dpy) $ do
initState initState
vpnAddedListener addedCallback vpnAddedListener addedCallback