X-Git-Url: http://www.git.stargrave.org/?p=public-inbox.git;a=blobdiff_plain;f=t%2Fv2writable.t;h=e49c06b98c0efde79faf596f22891bddc0cdc084;hp=2f8397764dae098923e5a5723d06313b238df417;hb=b4d127cb83230fe5cee0dcecb573107ad96a7c4c;hpb=89537db2ca4b506a7b7500dcd7b7c5430a0a6dc7

diff --git a/t/v2writable.t b/t/v2writable.t
index 2f839776..e49c06b9 100644
--- a/t/v2writable.t
+++ b/t/v2writable.t
@@ -248,7 +248,8 @@ EOF
 {
 	ok($im->add($mime), 'add message to be purged');
 	local $SIG{__WARN__} = sub {};
-	ok($im->purge($mime), 'purged message');
+	ok(my $cmts = $im->purge($mime), 'purged message');
+	like($cmts->[0], qr/\A[a-f0-9]{40}\z/, 'purge returned current commit');
 	$im->done;
 }