diff options
author | Guillem Jover <guillem@debian.org> | 2015-02-15 23:18:31 +0100 |
---|---|---|
committer | Guillem Jover <guillem@debian.org> | 2015-03-30 20:22:38 +0200 |
commit | 01abe8afb95f4bafb1f192fb3fe451a95cd2e3f8 (patch) | |
tree | 2384393b6e59f3b852a9ec70a4733e5f4310847a /scripts/Dpkg/Control/Fields.pm | |
parent | 046ad868331a9f1581837404449b4320e6d09c36 (diff) | |
download | dpkg-01abe8afb95f4bafb1f192fb3fe451a95cd2e3f8.tar.gz |
perl: Rework use and exporter declarations
Place 'use' strict and warnings first, then Exporter 'our' declarations,
then Test module imports, then system module imports, then Dpkg module
imports, then 'use' parent and overload pragmas, separated by a blank
line for each block.
Split each exported symbol declaration into its own line to ease
modifications.
Diffstat (limited to 'scripts/Dpkg/Control/Fields.pm')
-rw-r--r-- | scripts/Dpkg/Control/Fields.pm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/scripts/Dpkg/Control/Fields.pm b/scripts/Dpkg/Control/Fields.pm index 6f2eee4e3..d3f92725d 100644 --- a/scripts/Dpkg/Control/Fields.pm +++ b/scripts/Dpkg/Control/Fields.pm @@ -19,6 +19,7 @@ use strict; use warnings; our $VERSION = '1.00'; +our @EXPORT = @Dpkg::Control::FieldsCore::EXPORT; use Carp; use Exporter qw(import); @@ -26,8 +27,6 @@ use Exporter qw(import); use Dpkg::Control::FieldsCore; use Dpkg::Vendor qw(run_vendor_hook); -our @EXPORT = @Dpkg::Control::FieldsCore::EXPORT; - # Register vendor specifics fields foreach my $op (run_vendor_hook('register-custom-fields')) { next if not (defined $op and ref $op); # Skip when not implemented by vendor |