summaryrefslogtreecommitdiff
path: root/Test.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Test.hs')
-rw-r--r--Test.hs5
1 files changed, 5 insertions, 0 deletions
diff --git a/Test.hs b/Test.hs
index 95f4af23e..9f211d23b 100644
--- a/Test.hs
+++ b/Test.hs
@@ -180,6 +180,7 @@ unitTests :: String -> TestTree
unitTests note = testGroup ("Unit Tests " ++ note)
[ testCase "add sha1dup" test_add_sha1dup
, testCase "add extras" test_add_extras
+ , testCase "log" test_log
, testCase "import" test_import
, testCase "reinject" test_reinject
, testCase "unannex (no copy)" test_unannex_nocopy
@@ -282,6 +283,10 @@ test_add_extras = intmpclonerepo $ do
annexed_present wormannexedfile
checkbackend wormannexedfile backendWORM
+test_log :: Assertion
+test_log = intmpclonerepo $ do
+ git_annex "log" [annexedfile] @? "log failed"
+
test_import :: Assertion
test_import = intmpclonerepo $ Utility.Tmp.withTmpDir "importtest" $ \importdir -> do
(toimport1, importf1, imported1) <- mktoimport importdir "import1"