diff options
| author | Guillem Jover <guillem@debian.org> | 2013-01-04 02:51:56 +0100 |
|---|---|---|
| committer | Guillem Jover <guillem@debian.org> | 2013-04-30 15:50:47 +0200 |
| commit | d6851023a9ab87e3109fca3f2f9c6b5210575663 (patch) | |
| tree | 08783c201e5357d328bed20113fb952367509c82 /scripts/Dpkg/Source/Package/V2.pm | |
| parent | 39e0a3b9a62705098253ca4830654b6e9567a743 (diff) | |
| download | dpkg-d6851023a9ab87e3109fca3f2f9c6b5210575663.tar.gz | |
Do not quote simple identifier hash keys in initializations
Do not quote the keys for any hash which will always use simple
identifiers, as that is taken care of by the => operator. So this does
not apply to overload pragmas, version operators, field names, substvars,
command line options or filenames.
Addresses ValuesAndExpressions::ProhibitInterpolationOfLiterals.
Warned-by: perlcritic
Diffstat (limited to 'scripts/Dpkg/Source/Package/V2.pm')
| -rw-r--r-- | scripts/Dpkg/Source/Package/V2.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/scripts/Dpkg/Source/Package/V2.pm b/scripts/Dpkg/Source/Package/V2.pm index c05d9895d..ee9687386 100644 --- a/scripts/Dpkg/Source/Package/V2.pm +++ b/scripts/Dpkg/Source/Package/V2.pm @@ -530,7 +530,7 @@ sub do_build { my $debianfile = "$basenamerev.debian.tar." . $self->{'options'}{'comp_ext'}; info(_g("building %s in %s"), $sourcepackage, $debianfile); my $tar = Dpkg::Source::Archive->new(filename => $debianfile); - $tar->create(options => \@tar_ignore, 'chdir' => $dir); + $tar->create(options => \@tar_ignore, chdir => $dir); $tar->add_directory("debian"); foreach my $binary ($binaryfiles->get_seen_binaries()) { $tar->add_file($binary) unless $binary =~ m{^debian/}; |