diff options
| author | Guillem Jover <guillem@debian.org> | 2013-04-21 06:10:17 +0200 |
|---|---|---|
| committer | Guillem Jover <guillem@debian.org> | 2013-04-30 20:59:27 +0200 |
| commit | 62bc788a45e4a641c28ca9c8c5b9bb08f29faed8 (patch) | |
| tree | 440e84bf7a9a0ec56aea27cd7f5568ca581b2d46 /scripts/Dpkg/Path.pm | |
| parent | d6851023a9ab87e3109fca3f2f9c6b5210575663 (diff) | |
| download | dpkg-62bc788a45e4a641c28ca9c8c5b9bb08f29faed8.tar.gz | |
Do not quote simple identifier hash keys in element accesses
Addresses ValuesAndExpressions::ProhibitInterpolationOfLiterals.
Warned-by: perlcritic
Diffstat (limited to 'scripts/Dpkg/Path.pm')
| -rw-r--r-- | scripts/Dpkg/Path.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/scripts/Dpkg/Path.pm b/scripts/Dpkg/Path.pm index 5a8977037..3c75ef6f2 100644 --- a/scripts/Dpkg/Path.pm +++ b/scripts/Dpkg/Path.pm @@ -210,7 +210,7 @@ sub find_command($) { if ($cmd =~ m{/}) { return "$cmd" if -x "$cmd"; } else { - foreach my $dir (split(/:/, $ENV{'PATH'})) { + foreach my $dir (split(/:/, $ENV{PATH})) { return "$dir/$cmd" if -x "$dir/$cmd"; } } |