Pārlūkot izejas kodu

dpkg-genchanges: Use $include directly instead of convenience is_ functions

These were testing for the wrong thing, by checking for the reverse.
Remove the unnecessary functions and check for what we actually want,
which should make the code more clear.
Guillem Jover 12 gadi atpakaļ
vecāks
revīzija
e1666917ab
1 mainītis faili ar 3 papildinājumiem un 5 dzēšanām
  1. 3 5
      scripts/dpkg-genchanges.pl

+ 3 - 5
scripts/dpkg-genchanges.pl

@@ -89,8 +89,6 @@ use constant BUILD_ALL        => BUILD_BINARY | BUILD_SOURCE;
 my $include = BUILD_ALL;
 
 sub build_is_default() { return ($include & BUILD_ALL) == BUILD_ALL; }
-sub is_sourceonly() { return $include == BUILD_SOURCE; }
-sub is_binaryonly() { return !($include & BUILD_SOURCE); }
 sub build_opt {
     if ($include == BUILD_BINARY) {
        return '-b';
@@ -251,7 +249,7 @@ if (defined($prev_changelog) and
 
 my $dist = Dpkg::Dist::Files->new();
 
-if (not is_sourceonly) {
+if ($include & BUILD_BINARY) {
     my $dist_count = 0;
 
     $dist_count = $dist->load($fileslistfile) if -e $fileslistfile;
@@ -394,7 +392,7 @@ for my $p (keys %p2f) {
 
 my $origsrcmsg;
 
-if (!is_binaryonly) {
+if ($include & BUILD_SOURCE) {
     my $sec = $sourcedefault{'Section'};
     if (!defined($sec)) {
 	$sec = '-';
@@ -475,7 +473,7 @@ if (length($fields->{'Binary'}) > 980) {
     $fields->{'Binary'} =~ s/(.{0,980}) /$1\n/g;
 }
 
-unshift @archvalues, 'source' unless is_binaryonly;
+unshift @archvalues, 'source' if $include & BUILD_SOURCE;
 @archvalues = ('all') if $include == BUILD_ARCH_INDEP;
 @archvalues = grep { !debarch_eq('all', $_) } @archvalues
     unless $include & BUILD_ARCH_INDEP;