assistant: Fix OSX-specific bug that caused the startup scan to try to follow symlinks to other directories, and add their contents to the annex.

1 files changed, 1 insertions, 1 deletions

diff --git a/Seek.hs b/Seek.hs
index b2782fc36..a4e9a2fe5 100644
--- a/Seek.hs
+++ b/Seek.hs
@@ -61,7 +61,7 @@ withPathContents a params = map a . concat <$> liftIO (mapM get params)
   where
 	get p = ifM (isDirectory <$> getFileStatus p)
 		( map (\f -> (f, makeRelative (parentDir p) f))
-			<$> dirContentsRecursiveSkipping (".git" `isSuffixOf`) p
+			<$> dirContentsRecursiveSkipping (".git" `isSuffixOf`) True p
 		, return [(p, takeFileName p)]
 		)