diff options
author | 2011-06-22 19:52:13 -0400 | |
---|---|---|
committer | 2011-06-22 19:52:13 -0400 | |
commit | 4c8770c646c41598b73b3c86280514f1068e0d36 (patch) | |
tree | 3f462f01ddc125dee7d43c0d079bbcf7783b11f1 | |
parent | 36109a286e867a6a70b5f0194332f78cd64ca277 (diff) |
reove 2 tests that no longer make sense (state is not autocommitted)
-rw-r--r-- | test.hs | 5 |
1 files changed, 0 insertions, 5 deletions
@@ -19,7 +19,6 @@ import System.IO.Error import System.Posix.Env import qualified Control.Exception.Extensible as E import Control.Exception (throw) -import Control.Monad.State (liftIO) import Maybe import qualified Data.Map as M import System.Path (recurseDir) @@ -152,8 +151,6 @@ test_unannex = "git-annex unannex" ~: TestList [nocopy, withcopy] annexed_notpresent annexedfile withcopy = "with content" ~: intmpclonerepo $ do git_annex "get" ["-q", annexedfile] @? "get failed" - Utility.boolSystem "git" [Utility.Params "commit -q -a -m statechanged"] - @? "git commit of state failed" annexed_present annexedfile git_annex "unannex" ["-q", annexedfile, sha1annexedfile] @? "unannex failed" unannexed annexedfile @@ -167,8 +164,6 @@ test_drop = "git-annex drop" ~: TestList [noremote, withremote, untrustedremote] where noremote = "no remotes" ~: TestCase $ intmpclonerepo $ do git_annex "get" ["-q", annexedfile] @? "get failed" - Utility.boolSystem "git" [Utility.Params "commit -q -a -m statechanged"] - @? "git commit of state failed" Utility.boolSystem "git" [Utility.Params "remote rm origin"] @? "git remote rm origin failed" r <- git_annex "drop" ["-q", annexedfile] |