From b8bbe054324844ae6cdfc1fcd64dc66bc7a1326c Mon Sep 17 00:00:00 2001 From: Bas Zoetekouw Date: Tue, 30 Sep 2008 19:20:15 +0000 Subject: - Introduce Local::Util to contain useful utility functions. - Copy uniq() from List::MoreUtils to Local::Util - Get rid of dependencies on List::MoreUtils in favour of Local::Util CVS version numbers check_desc_trans.pl: 1.6 -> 1.7 check_trans.pl: 1.70 -> 1.71 Perl/Local/Util.pm: INITIAL -> 1.1 --- check_desc_trans.pl | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'check_desc_trans.pl') diff --git a/check_desc_trans.pl b/check_desc_trans.pl index 19501ef0d33..1465deb683e 100755 --- a/check_desc_trans.pl +++ b/check_desc_trans.pl @@ -36,10 +36,10 @@ use lib "$FindBin::Bin/Perl"; use File::Basename; use File::Spec::Functions; use File::Find::Rule; -use List::MoreUtils qw{ uniq }; use Term::ANSIColor; -use Local::VCS ':all'; +use Local::VCS ':all'; +use Local::Util 'uniq'; use strict; use warnings; @@ -243,4 +243,5 @@ sub check_all return ($nr_uptodate,$nr_old,$nr_needtrans,$nr_obsolete,$nr_error); } + __END__ -- cgit v1.2.3