diff options
author | Matthew Somerville <matthew-github@dracos.co.uk> | 2018-03-14 17:01:28 +0000 |
---|---|---|
committer | Matthew Somerville <matthew-github@dracos.co.uk> | 2018-03-15 08:55:11 +0000 |
commit | dbbf26e8ba5b41e3672566addfc7d67e9dc1af67 (patch) | |
tree | 9d26dff85468f230ede6764c85cd3ce561239f05 | |
parent | a3cbfda1d64e416a21f7aaa9f32705b050bf5911 (diff) |
Remove need for List::MoreUtils from setenv.pl
-rwxr-xr-x | setenv.pl | 7 |
1 files changed, 2 insertions, 5 deletions
@@ -25,12 +25,9 @@ for ( "$root/commonlib/perllib", "$root/perllib" ) { $ENV{PERL5LIB} = "$_:$ENV{PERL5LIB}"; } -# need to make sure we fetch this after our libs are in INC as some -# vendor provided versions are old an incompatible with Moose -use List::MoreUtils 'uniq'; - # also set the path to our scripts etc -$ENV{PATH} = join ':', uniq "$root/bin", split( m/:/, $ENV{PATH} ); +my %seen; +$ENV{PATH} = join ':', grep { not $seen{$_}++ } "$root/bin", split( m/:/, $ENV{PATH} ); # we might want to require this file to configure something like a CGI script if ( $0 eq __FILE__ ) { |