Pārlūkot izejas kodu

Dpkg::BuildOptions: deal properly with undefined values in merge()

Raphaël Hertzog 16 gadi atpakaļ
vecāks
revīzija
4c933be6a5
1 mainītis faili ar 1 papildinājumiem un 0 dzēšanām
  1. 1 0
      scripts/Dpkg/BuildOptions.pm

+ 1 - 0
scripts/Dpkg/BuildOptions.pm

@@ -82,6 +82,7 @@ values like "nocheck parallel=2".
 
 sub merge {
     my ($self, $content, $source) = @_;
+    return 0 unless defined $content;
     my $count = 0;
     foreach (split(/\s+/, $content)) {
 	unless (/^([a-z][a-z0-9_-]*)(?:=(\S*))?$/) {