From: Joey Hess <joeyh@joeyh.name>
Date: Mon, 2 Nov 2020 19:06:55 +0000 (-0400)
Subject: test case for view
X-Git-Tag: archive/raspbian/10.20250416-2+rpi1~1^2~106^2~7
X-Git-Url: https://dgit.raspbian.org/?a=commitdiff_plain;h=c2056c1cafce5538b61ac7112771780b92c17dc1;p=git-annex.git

test case for view

For reversion fixed in 9252f86b2e9a3ee218867e1ef4572766eb44418c

This commit was sponsored by Ethan Aubin
---

diff --git a/Test.hs b/Test.hs
index b9d4a7d130..94b400954f 100644
--- a/Test.hs
+++ b/Test.hs
@@ -298,6 +298,7 @@ unitTests note = testGroup ("Unit Tests " ++ note)
 	, testCase "export_import_subdir" test_export_import_subdir
 	, testCase "shared clone" test_shared_clone
 	, testCase "log" test_log
+	, testCase "view" test_view
 	, testCase "magic" test_magic
 	, testCase "import" test_import
 	, testCase "reinject" test_reinject
@@ -447,6 +448,14 @@ test_log :: Assertion
 test_log = intmpclonerepo $ do
 	git_annex "log" [annexedfile] @? "log failed"
 
+test_view :: Assertion
+test_view = intmpclonerepo $ do
+	git_annex "metadata" ["-s", "test=test1", annexedfile]  @? "metadata failed"
+	git_annex "metadata" ["-s", "test=test2", sha1annexedfile]  @? "metadata failed"
+	git_annex "view" ["test=test1"] @? "entering view failed"
+	checkexists annexedfile
+	checkdoesnotexist sha1annexedfile
+
 test_magic :: Assertion
 test_magic = intmpclonerepo $ do
 #ifdef WITH_MAGICMIME