touch -d 'last year' $tmp/git/$p.git
}
+t-git-dir-check () {
+ local gitdir=$tmp/git/$p.git
+ case "$1" in
+ enoent)
+ if test -e "$gitdir"; then fail "$gitdir exists"; fi
+ return
+ ;;
+ public) wantstat='7[75]5' ;;
+ secret) wantstat='7[70]0' ;;
+ *) fail "$1 t-git-dir-check ?" ;;
+ esac
+ gotstat=`stat -c%a $gitdir`
+ case "$gotstat" in
+ *$wantstat) return ;;
+ *) fail "$gitdir has mode $gotstat, expected $wantstat" ;;
+ esac
+}
+
t-dgit () {
local dgit=${DGIT_TEST-dgit}
: '
t-dgit build
t-expect-fail 'forbidden for testing' \
t-dgit push --new
+t-git-dir-check enoent
git reset --hard HEAD~
git commit --allow-empty -m 'will vanish from NEW'
t-dgit build
t-dgit push --new
+t-git-dir-check secret
t-policy-periodic
+t-git-dir-check secret
# pretend it vanished from new:
rm $tmp/incoming/*
t-git-dir-time-passes
t-policy-periodic
+t-git-dir-check enoent
git commit --allow-empty -m 'should require --deliberately...questionable'
t-dgit build
t-expect-fail 'tag debian/1.0 referred to this object.*all previously pushed versions were found to have been removed' \
t-dgit push --new
+t-git-dir-check enoent
t-dgit push --new --deliberately-include-questionable-history
+t-git-dir-check secret
echo xxx up to here