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

ADD logger for device listener

This commit is contained in:
Nathan Dwarshuis 2023-01-01 22:40:28 -05:00
parent 69ed4839da
commit 9d7ca49357
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
lib/Xmobar/Plugins/Device.hs
View File

@ -74,8 +74,8 @@ instance Exec Device where
where
logName = "device@" <> Utf8Builder (encodeUtf8Builder iface)
listener sys path = do
rule <- matchPropertyFull sys networkManagerBus (Just path)
-- TODO warn the user here rather than silently drop the listener
forM_ rule $ \r ->
startListener r (getDeviceConnected path) matchStatus chooseColor' cb sys
res <- matchPropertyFull sys networkManagerBus (Just path)
case res of
Just rule -> startListener rule (getDeviceConnected path) matchStatus chooseColor' cb sys
Nothing -> logError "could not start listener"
chooseColor' = return . (\s -> colorText colors s text) . (> 1)