ensure SQLite and Xapian files respect core.sharedRepository

[public-inbox.git] / t / v2writable.t

diff --git a/t/v2writable.t b/t/v2writable.t
index d37fb06eae1bdf08582db8ec5771d1841e68a793..00b08e0367d5adcb4431a16e0b43c41f3eb721d8 100644 (file)
--- a/t/v2writable.t
+++ b/t/v2writable.t
@@ -36,6 +36,15 @@ my $im = eval {
 };
 is($im->{partitions}, 1, 'one partition when forced');
 ok($im->add($mime), 'ordinary message added');
+foreach my $f ("$mainrepo/msgmap.sqlite3",
+               glob("$mainrepo/xap*/*"),
+               glob("$mainrepo/xap*/*/*")) {
+       my @st = stat($f);
+       my ($bn) = (split(m!/!, $f))[-1];
+       is($st[2] & 07777, -f _ ? 0660 : 0770,
+               "default sharedRepository respected for $bn");
+}
+
 my $git0;
 
 if ('ensure git configs are correct') {