The following commit has been merged in the master branch:
commit 726f6e1f097a1c9b26f923dd8d3a70ddc900c7e7
Author: Guillem Jover <[email protected]>
Date: Thu Feb 21 00:54:44 2013 +0100
scripts: Restrict POSIX imports to :errno_h, :fcntl_h or :sys_wait_h
This also gets rid of the EOF constant shadowing the EOF member from
Dpkg::Compression::FileHandle.
diff --git a/scripts/Dpkg/Source/Functions.pm b/scripts/Dpkg/Source/Functions.pm
index f84457f..61d472b 100644
--- a/scripts/Dpkg/Source/Functions.pm
+++ b/scripts/Dpkg/Source/Functions.pm
@@ -25,7 +25,7 @@ use Dpkg::ErrorHandling;
use Dpkg::Gettext;
use Dpkg::IPC;
-use POSIX;
+use POSIX qw(:errno_h);
sub erasedir {
my ($dir) = @_;
diff --git a/scripts/Dpkg/Source/Package.pm b/scripts/Dpkg/Source/Package.pm
index e5c6ab9..7978f10 100644
--- a/scripts/Dpkg/Source/Package.pm
+++ b/scripts/Dpkg/Source/Package.pm
@@ -48,7 +48,7 @@ use Dpkg::Path qw(check_files_are_the_same find_command);
use Dpkg::IPC;
use Dpkg::Vendor qw(run_vendor_hook);
-use POSIX;
+use POSIX qw(:errno_h :sys_wait_h);
use File::Basename;
# Public variables
diff --git a/scripts/Dpkg/Source/Package/V1.pm
b/scripts/Dpkg/Source/Package/V1.pm
index 39efba7..eae7748 100644
--- a/scripts/Dpkg/Source/Package/V1.pm
+++ b/scripts/Dpkg/Source/Package/V1.pm
@@ -32,7 +32,7 @@ use Dpkg::Exit;
use Dpkg::Source::Functions qw(erasedir);
use Dpkg::Source::Package::V3::native;
-use POSIX qw(!getcwd);
+use POSIX qw(:errno_h);
use Cwd;
use File::Basename;
use File::Temp qw(tempfile);
diff --git a/scripts/Dpkg/Source/Package/V2.pm
b/scripts/Dpkg/Source/Package/V2.pm
index 69019ca..a9590fd 100644
--- a/scripts/Dpkg/Source/Package/V2.pm
+++ b/scripts/Dpkg/Source/Package/V2.pm
@@ -34,7 +34,7 @@ use Dpkg::Vendor qw(run_vendor_hook);
use Dpkg::Control;
use Dpkg::Changelog::Parse;
-use POSIX qw(!getcwd);
+use POSIX qw(:errno_h);
use Cwd;
use File::Basename;
use File::Temp qw(tempfile tempdir);
diff --git a/scripts/Dpkg/Source/Patch.pm b/scripts/Dpkg/Source/Patch.pm
index 2e0dd92..bca6442 100644
--- a/scripts/Dpkg/Source/Patch.pm
+++ b/scripts/Dpkg/Source/Patch.pm
@@ -26,7 +26,7 @@ use Dpkg::IPC;
use Dpkg::ErrorHandling;
use Dpkg::Source::Functions qw(fs_time);
-use POSIX;
+use POSIX qw(:errno_h :sys_wait_h);
use File::Find;
use File::Basename;
use File::Spec;
diff --git a/scripts/dpkg-buildpackage.pl b/scripts/dpkg-buildpackage.pl
index e7554ee..6650e90 100755
--- a/scripts/dpkg-buildpackage.pl
+++ b/scripts/dpkg-buildpackage.pl
@@ -25,7 +25,7 @@ use warnings;
use Cwd;
use File::Basename;
-use POSIX;
+use POSIX qw(:sys_wait_h);
use Dpkg;
use Dpkg::Gettext;
diff --git a/scripts/dpkg-distaddfile.pl b/scripts/dpkg-distaddfile.pl
index 85269a4..b2f1761 100755
--- a/scripts/dpkg-distaddfile.pl
+++ b/scripts/dpkg-distaddfile.pl
@@ -21,8 +21,7 @@
use strict;
use warnings;
-use POSIX;
-use POSIX qw(:errno_h);
+use POSIX qw(:errno_h :fcntl_h);
use Dpkg;
use Dpkg::Gettext;
use Dpkg::ErrorHandling;
diff --git a/scripts/dpkg-gencontrol.pl b/scripts/dpkg-gencontrol.pl
index 8df486e..cabd242 100755
--- a/scripts/dpkg-gencontrol.pl
+++ b/scripts/dpkg-gencontrol.pl
@@ -22,8 +22,7 @@
use strict;
use warnings;
-use POSIX;
-use POSIX qw(:errno_h);
+use POSIX qw(:errno_h :fcntl_h);
use Dpkg;
use Dpkg::Gettext;
use Dpkg::ErrorHandling;
--
dpkg's main repository
--
To UNSUBSCRIBE, email to [email protected]
with a subject of "unsubscribe". Trouble? Contact [email protected]
