From c9e8ad671de1da7e75d45973109d223c9d4e8e81 Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Mon, 9 Jun 2014 13:48:44 -0400
Subject: qualify comment

---
 Utility/Daemon.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'Utility/Daemon.hs')

diff --git a/Utility/Daemon.hs b/Utility/Daemon.hs
index e715ecbe7..39c42bf53 100644
--- a/Utility/Daemon.hs
+++ b/Utility/Daemon.hs
@@ -49,8 +49,8 @@ daemonize logfd pidfile changedirectory a = do
 		nullfd <- openFd "/dev/null" ReadOnly Nothing defaultFileFlags
 		redir nullfd stdInput
 		redirLog logfd
-		{- forkProcess masks async exceptions; unmask them inside
-		 - the action. -}
+		{- In old versions of ghc, forkProcess masks async exceptions;
+		 - unmask them inside the action. -}
 		wait =<< asyncWithUnmask (\unmask -> unmask a)
 		out
 	out = exitImmediately ExitSuccess
-- 
cgit v1.2.3