From cd5108bb47a4983b1476110d70e96619f8444f3a Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Thu, 11 May 2023 13:20:35 -0400 Subject: [PATCH] uninit: remove undocumented suport for specifying files to act on I think this was just copied from another command without paying attention to what it did, because there does not seem to be any valid reason to want to only unannex some files when running uninit. --- Command/Uninit.hs | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/Command/Uninit.hs b/Command/Uninit.hs index aee530e796..48453392f8 100644 --- a/Command/Uninit.hs +++ b/Command/Uninit.hs @@ -28,7 +28,7 @@ cmd :: Command cmd = addCheck check $ command "uninit" SectionUtility "de-initialize git-annex and clean out repository" - paramPaths (withParams seek) + paramNothing (withParams seek) check :: Annex () check = do @@ -48,9 +48,9 @@ check = do revhead = inRepo $ Git.Command.pipeReadStrict [Param "rev-parse", Param "--abbrev-ref", Param "HEAD"] -seek :: CmdParams -> CommandSeek -seek ps = do - l <- workTreeItems ww ps +seek :: CommandParams -> CommandSeek +seek = withNothing $ do + l <- workTreeItems ww [] withFilesNotInGit (CheckGitIgnore False) (WarnUnmatchWorkTreeItems "uninit")