REF make commands explicit so we can easily add to individual ones later
This commit is contained in:
parent
a020dbe82f
commit
07e6786632
|
@ -182,8 +182,11 @@ myPowerPrompt = mkXPrompt PowerPrompt conf comps
|
|||
comps = (mkComplFunFromList' (map fst commands))
|
||||
conf = hotPromptTheme
|
||||
commands =
|
||||
map (\cmd -> (cmd, spawn $ "systemctl " ++ cmd))
|
||||
[ "poweroff", "suspend", "reboot", "hibernate"]
|
||||
[ ("poweroff", spawn "systemctl poweroff")
|
||||
, ("suspend", spawn "systemctl suspend")
|
||||
, ("hibernate", spawn "systemctl hibernate")
|
||||
, ("reboot", spawn "systemctl reboot")
|
||||
]
|
||||
|
||||
-- osd
|
||||
|
||||
|
|
Loading…
Reference in New Issue