From bb9965cc06ef3df8664e43512c455e097dccdc07 Mon Sep 17 00:00:00 2001
From: Mark Dittmer <mark.s.dittmer@gmail.com>
Date: Fri, 28 Dec 2012 00:47:30 -0500
Subject: [PATCH] Fixed not-equals typo

---
 src/System/Win32/Notify.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/System/Win32/Notify.hs b/src/System/Win32/Notify.hs
index 219f4b5..ec94ae2 100644
--- a/src/System/Win32/Notify.hs
+++ b/src/System/Win32/Notify.hs
@@ -127,7 +127,7 @@ watch (WatchManager mvarMap) dir watchSubTree varieties = do
 killWatch :: WatchId -> IO ()
 killWatch (WatchId tid1 tid2 handle) = do
     killThread tid1
-    if tid1 != tid2 then killThread tid2 else void
+    if tid1 /= tid2 then killThread tid2 else void
     closeHandle handle
 
 eventToVariety :: Event -> EventVariety