diff options
| author | Dominique Dumont <dod@debian.org> | 2021-06-12 18:35:02 +0200 |
|---|---|---|
| committer | Dominique Dumont <dod@debian.org> | 2021-06-12 18:42:58 +0200 |
| commit | 61af2f8d095a5d68f04d60951511c38993c485ac (patch) | |
| tree | cec08283dd7880f639c4c1f623a9215dfc7bd2ef | |
| parent | d18d6480f94d1acffd696c25564d96503e5b4ba2 (diff) | |
refactor (Dpkg::Copyright): avoid map in void context
| -rw-r--r-- | lib/Config/Model/Dpkg/Copyright.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lib/Config/Model/Dpkg/Copyright.pm b/lib/Config/Model/Dpkg/Copyright.pm index 22a40ebf..4cd1f50d 100644 --- a/lib/Config/Model/Dpkg/Copyright.pm +++ b/lib/Config/Model/Dpkg/Copyright.pm @@ -255,7 +255,9 @@ sub update ($self, %args) { my $filler = "Please fill license $l from header of @paths"; if ($lic_count > 1 ) { $self->_say( "Adding dummy global license text for license $l for path @paths"); - map { $self->load(qq!License:"$_" text="$filler"!) } @empty_licenses ; + for my $lic (@empty_licenses) { + $self->load(qq!License:"$lic" text="$filler"!) + }; } else { |