chiark / gitweb /
dgit-repos-server: message improvements
[dgit.git] / dgit-repos-server
index a17a7ffe0f98f7e7d65960433c3dd51f9c66da2f..eb59edc4e2b02014b225808a34d75388a1ccbe50 100755 (executable)
@@ -245,7 +245,7 @@ sub readupdates () {
     debug " updates ...";
     while (<STDIN>) {
        chomp or die;
-       debug " updates| $_";
+       debug " upd.| $_";
        m/^(\S+) (\S+) (\S+)$/ or die "$_ ?";
        my ($old, $sha1, $refname) = ($1, $2, $3);
        if ($refname =~ m{^refs/tags/(?=debian/)}) {
@@ -292,7 +292,7 @@ sub parsetag () {
 
     die unless $1 eq $package;
     $version = $2;
-    die unless $3 eq $suite;
+    die "$3 != $suite " unless $3 eq $suite;
 
     for (;;) {
        print PT or die $!;