From b3aaf980e460c2287fc1ef2b262685b1879e6ed0 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Wed, 29 Jun 2011 11:42:00 -0400 Subject: --force will cause add, etc, to operate on ignored files. --- Command.hs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'Command.hs') diff --git a/Command.hs b/Command.hs index 228c1f40e..ee81bd0f6 100644 --- a/Command.hs +++ b/Command.hs @@ -143,7 +143,8 @@ withFilesMissing a params = do withFilesNotInGit :: CommandSeekBackendFiles withFilesNotInGit a params = do repo <- Annex.gitRepo - newfiles <- liftIO $ runPreserveOrder (Git.notInRepo repo) params + force <- Annex.getState Annex.force + newfiles <- liftIO $ runPreserveOrder (Git.notInRepo repo force) params newfiles' <- filterFiles newfiles backendPairs a newfiles' withWords :: CommandSeekWords -- cgit v1.2.3