uninit: delete .git/annex/
This commit is contained in:
parent
9d7b35f7ad
commit
5beb6bc76f
2 changed files with 7 additions and 4 deletions
|
@ -21,6 +21,7 @@ import qualified Command.Unannex
|
||||||
import qualified Command.Init
|
import qualified Command.Init
|
||||||
import qualified Branch
|
import qualified Branch
|
||||||
import Content
|
import Content
|
||||||
|
import Locations
|
||||||
|
|
||||||
command :: [Command]
|
command :: [Command]
|
||||||
command = [repoCommand "uninit" paramPath seek
|
command = [repoCommand "uninit" paramPath seek
|
||||||
|
@ -40,9 +41,11 @@ cleanup = do
|
||||||
g <- Annex.gitRepo
|
g <- Annex.gitRepo
|
||||||
gitPreCommitHookUnWrite g
|
gitPreCommitHookUnWrite g
|
||||||
saveState
|
saveState
|
||||||
liftIO $ Git.run g "branch" [Param "-D", Param Branch.name]
|
liftIO $ do
|
||||||
-- bypass normal shutdown, which writes to the deleted branch
|
Git.run g "branch" [Param "-D", Param Branch.name]
|
||||||
liftIO exitSuccess
|
removeDirectoryRecursive (gitAnnexDir g)
|
||||||
|
-- avoid normal shutdown
|
||||||
|
exitSuccess
|
||||||
|
|
||||||
gitPreCommitHookUnWrite :: Git.Repo -> Annex ()
|
gitPreCommitHookUnWrite :: Git.Repo -> Annex ()
|
||||||
gitPreCommitHookUnWrite repo = do
|
gitPreCommitHookUnWrite repo = do
|
||||||
|
|
2
debian/changelog
vendored
2
debian/changelog
vendored
|
@ -1,6 +1,6 @@
|
||||||
git-annex (3.20110703) UNRELEASED; urgency=low
|
git-annex (3.20110703) UNRELEASED; urgency=low
|
||||||
|
|
||||||
* uninit: Delete the git-annex branch.
|
* uninit: Delete the git-annex branch and .git/annex/
|
||||||
|
|
||||||
-- Joey Hess <joeyh@debian.org> Mon, 04 Jul 2011 15:50:21 -0400
|
-- Joey Hess <joeyh@debian.org> Mon, 04 Jul 2011 15:50:21 -0400
|
||||||
|
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue