diff options
author | Bas Zoetekouw <bas> | 2008-09-30 19:20:15 +0000 |
---|---|---|
committer | Bas Zoetekouw <bas> | 2008-09-30 19:20:15 +0000 |
commit | b8bbe054324844ae6cdfc1fcd64dc66bc7a1326c (patch) | |
tree | a9cb39b1caa3558bceb7793a5268e7c14da62221 /check_desc_trans.pl | |
parent | 39d1699093c380c7664132a2f41bfac2f22b9011 (diff) |
- 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
Diffstat (limited to 'check_desc_trans.pl')
-rwxr-xr-x | check_desc_trans.pl | 5 |
1 files changed, 3 insertions, 2 deletions
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__ |