mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

tweak

Browse source
This commit is contained in:
Joey Hess 2012-06-06 23:30:38 -04:00
parent c56812980c
commit d5de27ff40
1 changed files with 6 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

12
Command/Watch.hs
View file

@ -59,16 +59,16 @@ start = notBareRepo $ do
putStrLn "(started)" putStrLn "(started)"
waitForTermination waitForTermination
return True return True
where
ignored ".git" = True
ignored ".gitignore" = True
ignored ".gitattributes" = True
ignored _ = False
#else #else
start = error "watch mode is so far only available on Linux" start = error "watch mode is so far only available on Linux"
#endif #endif
ignored :: FilePath -> Bool
ignored ".git" = True
ignored ".gitignore" = True
ignored ".gitattributes" = True
ignored _ = False
{- Runs a handler, inside the Annex monad. {- Runs a handler, inside the Annex monad.
- -
- Exceptions by the handlers are ignored, otherwise a whole watcher - Exceptions by the handlers are ignored, otherwise a whole watcher