chiark
/
gitweb
/
~ianmdlvl
/
dgit.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Test suite: t-expect-push-fail checks HEAD object did not arrive
[dgit.git]
/
tests
/
lib
diff --git
a/tests/lib
b/tests/lib
index 03c25ce335ac3b96334c48673de29fe558840e82..5b93d98dc86b074d71080106cf9ca35a8ec43e9c 100644
(file)
--- a/
tests/lib
+++ b/
tests/lib
@@
-74,15
+74,22
@@
t-expect-fail () {
t-expect-push-fail () {
local mpat="$1"; shift
t-expect-push-fail () {
local mpat="$1"; shift
+
+ local triedpush=`git rev-parse HEAD`
+
t-reporefs pre-push
t-expect-fail "$mpat" "$@"
t-reporefs post-push
diff $tmp/show-refs.{pre,post}-push
t-reporefs pre-push
t-expect-fail "$mpat" "$@"
t-reporefs post-push
diff $tmp/show-refs.{pre,post}-push
+ t-git-objects-not-present '' $triedpush
+
eval "$t_expect_push_fail_hook"
}
t-git-objects-not-present () {
eval "$t_expect_push_fail_hook"
}
t-git-objects-not-present () {
+ # t-git-objects-not-present GITDIR|'' OBJID [...]
+ # specifying '' means the repo for package $p
local gitdir="${1-$tmp/git/$p.git}"
local obj
if ! [ -e "$gitdir" ]; then return; fi
local gitdir="${1-$tmp/git/$p.git}"
local obj
if ! [ -e "$gitdir" ]; then return; fi