FIX missed a spot

This commit is contained in:
Nathan Dwarshuis 2023-01-02 19:50:44 -05:00
parent 12b68f7377
commit 0895586cf7
1 changed files with 1 additions and 1 deletions

View File

@ -98,7 +98,7 @@ handleACPI fb lock tag = do
LidClose -> do
status <- io isDischarging
-- only run suspend if battery exists and is discharging
forM_ status $ flip when runSuspend
forM_ status $ flip when $ liftIO runSuspend
lock
--------------------------------------------------------------------------------