diff options
| author | Guillem Jover <guillem@debian.org> | 2012-12-30 15:13:44 +0100 |
|---|---|---|
| committer | Guillem Jover <guillem@debian.org> | 2013-04-29 18:46:50 +0200 |
| commit | 6024a66abdf9e49f29099a49c0f057459d77df80 (patch) | |
| tree | 5689a729789793673b933f0f19c16a9abb072065 /scripts/Dpkg/Source/Package/V2.pm | |
| parent | 14b92d54d044fc9b932997869107a1ae02a1a60f (diff) | |
| download | dpkg-6024a66abdf9e49f29099a49c0f057459d77df80.tar.gz | |
scripts: Use // operator instead of an explicit defined check
Diffstat (limited to 'scripts/Dpkg/Source/Package/V2.pm')
| -rw-r--r-- | scripts/Dpkg/Source/Package/V2.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/scripts/Dpkg/Source/Package/V2.pm b/scripts/Dpkg/Source/Package/V2.pm index 9a164ccf8..c05d9895d 100644 --- a/scripts/Dpkg/Source/Package/V2.pm +++ b/scripts/Dpkg/Source/Package/V2.pm @@ -195,7 +195,7 @@ sub get_autopatch_name { sub get_patches { my ($self, $dir, %opts) = @_; - $opts{"skip_auto"} = 0 unless defined($opts{"skip_auto"}); + $opts{"skip_auto"} //= 0; my @patches; my $pd = "$dir/debian/patches"; my $auto_patch = $self->get_autopatch_name(); @@ -214,7 +214,7 @@ sub get_patches { sub apply_patches { my ($self, $dir, %opts) = @_; - $opts{"skip_auto"} = 0 unless defined($opts{"skip_auto"}); + $opts{"skip_auto"} //= 0; my @patches = $self->get_patches($dir, %opts); return unless scalar(@patches); my $applied = File::Spec->catfile($dir, "debian", "patches", ".dpkg-source-applied"); |