summaryrefslogtreecommitdiff
path: root/Commands.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2010-10-16 23:36:45 -0400
committerGravatar Joey Hess <joey@kitenet.net>2010-10-16 23:36:45 -0400
commitaaee8e231f111b9b4a2ead95eaaeb3d635cc1699 (patch)
tree7d0518f3def196346a361bc913c0c2febc32b987 /Commands.hs
parent20b447782a974408594692c7aa6ce8bc26f87858 (diff)
bugfix
Diffstat (limited to 'Commands.hs')
-rw-r--r--Commands.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Commands.hs b/Commands.hs
index dfb3eef43..258490996 100644
--- a/Commands.hs
+++ b/Commands.hs
@@ -57,7 +57,7 @@ findWanted FilesNotInGit params repo = do
return $ filter notstate $ foldl (++) [] files
where
-- never include files in the state directory
- notstate f = f /= take (length stateLoc) f
+ notstate f = stateLoc /= take (length stateLoc) f
findWanted FilesInGit params repo = do
files <- mapM (Git.inRepo repo) params
return $ foldl (++) [] files