From 733cf820a49f0c9777fc237c63fa497251f3025a Mon Sep 17 00:00:00 2001 From: Igor Sverdlov Date: Sat, 24 Nov 2018 20:47:37 +0300 Subject: [PATCH] use uniq from List::Util --- lib/Data/DPath/Context.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/Data/DPath/Context.pm b/lib/Data/DPath/Context.pm index 6379074..38f62b9 100644 --- a/lib/Data/DPath/Context.pm +++ b/lib/Data/DPath/Context.pm @@ -10,7 +10,7 @@ use aliased 'Data::DPath::Attrs'; use Scalar::Util 'reftype'; use Data::DPath::Filters; use Iterator::Util; -use List::Util 1.45 'min', 'uniqnum'; +use List::Util 1.45 'min', 'uniq'; #use Sys::CPU; use POSIX (); use Safe; @@ -166,7 +166,7 @@ sub _all_ref { return [ map { $self->give_references ? $_ : $$_ } - uniqnum + uniq map { defined $_ ? $_->ref : () } @{$self->current_points} ];