From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sat, 6 Jul 2019 17:04:33 +0000 (+0100)
Subject: test suite: tagupl: Test a really broken tag
X-Git-Tag: archive/debian/9.1~45
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=commitdiff_plain;h=445b069db22353d0392c20c8f14ade9cdba24c25;p=dgit.git

test suite: tagupl: Test a really broken tag

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---

diff --git a/tests/tests/tagupl b/tests/tests/tagupl
index 0d72d3cd..756a2ef6 100755
--- a/tests/tests/tagupl
+++ b/tests/tests/tagupl
@@ -85,4 +85,19 @@ tagname=test-dummy/$v
 
 expect-quit noplease s/please-upload/plunk/ 'tag missing please-upload'
 
+# we do this now because we are about to generate a broken tag
+t-fscks
+
+next-mangle badtagger
+git cat-file tag test-dummy/1.0-1 | perl -pe '
+	s/\+\d+$/xyz/ if m/^tagger /;
+	exit 0 if m/^$/;
+' >../tagobj-$ident
+echo >>../tagobj-$ident
+cat ../basetag >>../tagobj-$ident
+git update-ref $tagname $(git hash-object -w -t tag ../tagobj-$ident)
+
+cd ..
+rm -rf $p
+
 t-ok