summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--Command/Watch.hs12
1 files changed, 6 insertions, 6 deletions
diff --git a/Command/Watch.hs b/Command/Watch.hs
index b812691bf..046fca7d1 100644
--- a/Command/Watch.hs
+++ b/Command/Watch.hs
@@ -59,16 +59,16 @@ start = notBareRepo $ do
putStrLn "(started)"
waitForTermination
return True
- where
- ignored ".git" = True
- ignored ".gitignore" = True
- ignored ".gitattributes" = True
- ignored _ = False
-
#else
start = error "watch mode is so far only available on Linux"
#endif
+ignored :: FilePath -> Bool
+ignored ".git" = True
+ignored ".gitignore" = True
+ignored ".gitattributes" = True
+ignored _ = False
+
{- Runs a handler, inside the Annex monad.
-
- Exceptions by the handlers are ignored, otherwise a whole watcher