X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=dgit.git;a=blobdiff_plain;f=tests%2Ftests%2Fgdr-subcommands;h=c48fb5d80e62a68fb97b1912a89142f02896318a;hp=e59fc07aaeab6ada1e0a510e3be9ff8b3027d299;hb=caa7cbcf78c1b936d5300f34c83a6b33ebebf50c;hpb=f7e37ea9f83b46c5efa4152b36c6cc0f4b91fadd

diff --git a/tests/tests/gdr-subcommands b/tests/tests/gdr-subcommands
index e59fc07a..c48fb5d8 100755
--- a/tests/tests/gdr-subcommands
+++ b/tests/tests/gdr-subcommands
@@ -4,6 +4,7 @@ set -e
 
 t-dependencies GDR
 
+t-tstunt-parsechangelog
 t-setup-import gdr-convert-gbp
 
 cd $p
@@ -34,10 +35,12 @@ mix-it
 
 git checkout -b unstitched-laundered master
 mix-it
+git branch before-unstitch/unstitched-laundered
 t-git-debrebase
 t-gdr-good laundered
 
 git checkout -b unstitched-mixed master
+git branch before-unstitch/unstitched-mixed
 t-git-debrebase
 mix-it
 
@@ -172,6 +175,12 @@ make_check () {
 	f*)
 		t-has-ancestor HEAD refs/heads/$before
 		;;
+	Z*)
+		t-refs-same-start
+		t-refs-same refs/heads/$work
+		t-refs-same refs/heads/before-unstitch/$startbranch
+ 		t-ref-head
+		;;
 	*)
 		fail "$1"
 		;;
@@ -194,6 +203,7 @@ subcmd	stitch		Ns	Nu	Sltf	Stf
 subcmd	prepush		Ns	Nu	Sltf	Stf
 subcmd	quick		ns	Sl	Sltf	Sl
 subcmd	conclude	"$Ec"	"$Ec"	Sltf	Sl
+subcmd	scrap		Ns	Ns	Z	Z
 subcmd	make-patches	sPft	"$Ep"	uPft	"$Ep"
 #subcmd	dgit-upload-hook Psft	"$Ep"	SPft	"$Ep"
 #
@@ -214,6 +224,7 @@ subcmd	make-patches	sPft	"$Ep"	uPft	"$Ep"
 #   V		ffq-prev remains unchanged; implies also u
 #   s		result is stitched, debrebase-last exists and is unchanged
 #   S		result is stitch just made, remaining letters apply to result~
+#   Z		result is rewind to before changes made
 #
 #   P		result is add-patches, remaining letters apply to result~
 #