diff --git a/fswatch.cabal b/fswatch.cabal
--- a/fswatch.cabal
+++ b/fswatch.cabal
@@ -1,6 +1,6 @@
 
 name:                fswatch
-version:             0.1.0.3
+version:             0.1.0.4
 synopsis:            File System watching tool with cli and slave functionalities.
 description:         File System watching tool with cli and slave lib (with os process) functionalities.
 category:            Filesystem
diff --git a/src/System/FSWatch.hs b/src/System/FSWatch.hs
--- a/src/System/FSWatch.hs
+++ b/src/System/FSWatch.hs
@@ -163,9 +163,9 @@
     return man
 
 event2PE :: Event -> PE
-event2PE (Added str _) = Add str
-event2PE (Modified str _) = Mod str
-event2PE (Removed str _) = Rem str
+event2PE (Added str _ _) = Add str
+event2PE (Modified str _ _) = Mod str
+event2PE (Removed str _ _) = Rem str
 
 stop :: P -> String -> DB -> InputT IO ()
 stop p _ [] = printP p "no whatching this"
