diff options
| author | Guillem Jover <guillem@debian.org> | 2012-12-30 03:08:21 +0100 |
|---|---|---|
| committer | Guillem Jover <guillem@debian.org> | 2013-04-29 18:46:50 +0200 |
| commit | 14b92d54d044fc9b932997869107a1ae02a1a60f (patch) | |
| tree | 31dc5ea0f3f85b5b3f0a6db3dacc361d3f912fa8 /scripts/Dpkg/Source/Package/V2.pm | |
| parent | f215ebacf1183e33da3287533c8eec60cc5af418 (diff) | |
| download | dpkg-14b92d54d044fc9b932997869107a1ae02a1a60f.tar.gz | |
scripts: Do not use sort directly on the return keyword
Fixes Subroutines::ProhibitReturnSort.
Warned-by: perlcritic
Diffstat (limited to 'scripts/Dpkg/Source/Package/V2.pm')
| -rw-r--r-- | scripts/Dpkg/Source/Package/V2.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/scripts/Dpkg/Source/Package/V2.pm b/scripts/Dpkg/Source/Package/V2.pm index 1021d9e80..9a164ccf8 100644 --- a/scripts/Dpkg/Source/Package/V2.pm +++ b/scripts/Dpkg/Source/Package/V2.pm @@ -738,7 +738,8 @@ sub get_unknown_binaries { sub get_seen_binaries { my ($self) = @_; - return sort keys %{$self->{'seen_binaries'}}; + my @seen = sort keys %{$self->{'seen_binaries'}}; + return @seen; } 1; |