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-source.pl | |
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-source.pl')
-rwxr-xr-x | scripts/dpkg-source.pl | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/scripts/dpkg-source.pl b/scripts/dpkg-source.pl index 48e8ebe0e..dbb51003c 100755 --- a/scripts/dpkg-source.pl +++ b/scripts/dpkg-source.pl @@ -28,6 +28,10 @@ use strict; use warnings; +use Cwd; +use File::Basename; +use File::Spec; + use Dpkg (); use Dpkg::Gettext; use Dpkg::ErrorHandling; @@ -47,10 +51,6 @@ use Dpkg::Source::Package qw(get_default_diff_ignore_regex get_default_tar_ignore_pattern); use Dpkg::Vendor qw(run_vendor_hook); -use Cwd; -use File::Basename; -use File::Spec; - textdomain('dpkg-dev'); my $controlfile; |