dgit: Remove redundant use of List::Util qw(any). Closes:#851280.

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>

diff --git a/debian/changelog b/debian/changelog
index dfd59b79464146aabaed0e9afb3e797b9f79ad7d..ec9a67424ed6d53d871c62d1eb4ffa4e57d6e28f 100644 (file)
--- a/debian/changelog
+++ b/debian/changelog
@@ -8,6 +8,7 @@ dgit (3.3~) unstable; urgency=medium
     Closes:#851213.
 
   Packaging:
     Closes:#851213.
 
   Packaging:

+  * Remove redundant use of List::Util qw(any).  Closes:#851280.

   * Remove redundant Recommends on libtext-iconv-perl.
 
   Test suite:
   * Remove redundant Recommends on libtext-iconv-perl.
 
   Test suite:

diff --git a/dgit b/dgit
index 4b088dbc316f0e8f2a3fa0d3a922895eadfd3457..fbf844e08370225f191f4bdc3a63ce602c80d703 100755 (executable)
--- a/dgit
+++ b/dgit
@@ -34,7 +34,6 @@ use POSIX;
 use IPC::Open2;
 use Digest::SHA;
 use Digest::MD5;
 use IPC::Open2;
 use Digest::SHA;
 use Digest::MD5;

-use List::Util qw(any);

 use List::MoreUtils qw(pairwise);
 use Text::Glob qw(match_glob);
 use Fcntl qw(:DEFAULT :flock);
 use List::MoreUtils qw(pairwise);
 use Text::Glob qw(match_glob);
 use Fcntl qw(:DEFAULT :flock);