haskell-spy: drop obsolete override

This commit is contained in:
Peter Simons 2016-09-17 13:20:16 +02:00
parent 2140aca679
commit 70150639a8
2 changed files with 0 additions and 29 deletions

View File

@ -981,9 +981,6 @@ self: super: {
''; '';
}); });
# https://bitbucket.org/ssaasen/spy/pull-requests/3/fsnotify-dropped-system-filepath
spy = appendPatch super.spy ./patches/spy.patch;
idris = overrideCabal super.idris (drv: { idris = overrideCabal super.idris (drv: {
# "idris" binary cannot find Idris library otherwise while building. After # "idris" binary cannot find Idris library otherwise while building. After
# installing it's completely fine though. This seems like a bug in Idris # installing it's completely fine though. This seems like a bug in Idris

View File

@ -1,26 +0,0 @@
diff --git a/src/Spy/Watcher.hs b/src/Spy/Watcher.hs
index 8512613..4df67d4 100644
--- a/src/Spy/Watcher.hs
+++ b/src/Spy/Watcher.hs
@@ -50,7 +50,7 @@ plainFormat = Plain
spy :: Spy -> IO b -> IO ()
spy config after = withManager $ \wm ->
runIndefinitely
- (watchTree wm (decodeString $ dir config)
+ (watchTree wm (dir config)
(not . skipEvent config . eventPath)
(handleEvent config))
(const after)
@@ -106,9 +106,9 @@ eventTime (Modified _ t) = t
eventTime (Removed _ t) = t
eventPath :: Event -> FilePath
-eventPath (Added fp _) = encodeString fp
-eventPath (Modified fp _) = encodeString fp
-eventPath (Removed fp _) = encodeString fp
+eventPath (Added fp _) = fp
+eventPath (Modified fp _) = fp
+eventPath (Removed fp _) = fp
eventType :: Event -> FilePath
eventType (Added _ _) = "Added"