From 445b069db22353d0392c20c8f14ade9cdba24c25 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sat, 6 Jul 2019 18:04:33 +0100
Subject: test suite: tagupl: Test a really broken tag

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---
 tests/tests/tagupl | 15 +++++++++++++++
 1 file changed, 15 insertions(+)

(limited to 'tests')

diff --git a/tests/tests/tagupl b/tests/tests/tagupl
index 0d72d3c..756a2ef 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
-- 
cgit v1.2.3