The following commit has been merged in the master branch:
commit 88bdb13ba3e3d61c33513581e507a1041b5e583d
Author: Guillem Jover <[email protected]>
Date:   Thu Feb 21 00:54:44 2013 +0100

    scripts: Remove unused POSIX module usage
    
    In addition to avoiding imports from unneeded modules, this fixes
    a perl warning due to redefinition of getcwd() exported by both
    the POSIX and Cwd modules, affecting any program executed with
    «perl -w» and including the Dpkg::Source::Archive module.
    
    Closes: #700978
    
    Reported-by: Niels Thykier <[email protected]>
    Analysis-by: Raphaël Hertzog <[email protected]>

diff --git a/debian/changelog b/debian/changelog
index 8f5ad99..7ffab36 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -12,6 +12,8 @@ dpkg (1.16.10) UNRELEASED; urgency=low
   * Do not accept Armor Header Lines inside a paragraph.
   * Do not abort dselect when multiarch is detected, as that only makes
     users downgrade and hold on an older version w/ worse multiarch support.
+  * Fix warning in Dpkg::Source::Archive with «perl -w» due to redefinition
+    of getcwd() by removing unused POSIX modules usage. Closes: #700978
 
   [ Updated programs translations ]
   * Esperanto (Felipe Castro).
diff --git a/scripts/Dpkg/Source/Archive.pm b/scripts/Dpkg/Source/Archive.pm
index 5e040ca..39d6704 100644
--- a/scripts/Dpkg/Source/Archive.pm
+++ b/scripts/Dpkg/Source/Archive.pm
@@ -25,7 +25,6 @@ use Dpkg::Gettext;
 use Dpkg::IPC;
 use Dpkg::ErrorHandling;
 
-use POSIX;
 use File::Temp qw(tempdir);
 use File::Basename qw(basename);
 use File::Spec;
diff --git a/scripts/changelog/debian.pl b/scripts/changelog/debian.pl
index e201862..0fb2fff 100755
--- a/scripts/changelog/debian.pl
+++ b/scripts/changelog/debian.pl
@@ -23,7 +23,6 @@ use strict;
 use warnings;
 
 use Getopt::Long qw(:config posix_default bundling no_ignorecase);
-use POSIX;
 
 use Dpkg;
 use Dpkg::Gettext;
diff --git a/scripts/dpkg-genchanges.pl b/scripts/dpkg-genchanges.pl
index 0826641..da8c8d5 100755
--- a/scripts/dpkg-genchanges.pl
+++ b/scripts/dpkg-genchanges.pl
@@ -23,7 +23,6 @@ use strict;
 use warnings;
 
 use Encode;
-use POSIX;
 use POSIX qw(:errno_h :signal_h);
 use Dpkg;
 use Dpkg::Gettext;

-- 
dpkg's main repository


-- 
To UNSUBSCRIBE, email to [email protected]
with a subject of "unsubscribe". Trouble? Contact [email protected]

Reply via email to