[backend] improve error message and fix perl syntax for SLE 15

openSUSE · Feb 20, 2018 · d3a4e72 · d3a4e72
1 parent be156a9
commit d3a4e72
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/backend/BSVerify.pm b/src/backend/BSVerify.pm
@@ -262,7 +262,7 @@ sub verify_proj {
   for my $link (@{$proj->{'link'} || []}) {
     verify_projid($link->{'project'});
     if (exists($link->{'vrevmode'})) {
-      die("bad vrevmode attribute\n") unless $link->{'vrevmode'} && ($link->{'vrevmode'} eq 'extend' || $link->{'vrevmode'} eq 'unextend');
+      die("bad vrevmode attribute: $link->{'vrevmode'}\n") unless $link->{'vrevmode'} && ($link->{'vrevmode'} eq 'extend' || $link->{'vrevmode'} eq 'unextend');
     }
   }
   for my $f ('build', 'publish', 'debuginfo', 'useforbuild', 'lock', 'binarydownload', 'sourceaccess', 'access') {