squash warning

This commit is contained in:
Joey Hess 2013-12-05 14:16:07 -04:00
parent 7a8e47d178
commit 621ca07119

View file

@ -53,7 +53,7 @@ getShutdownConfirmedR = do
threadDelay 2000000 threadDelay 2000000
signalProcess sigTERM =<< getProcessID signalProcess sigTERM =<< getProcessID
#else #else
liftIO exitSuccess void $ liftIO exitSuccess
#endif #endif
redirect NotRunningR redirect NotRunningR