From 4947ddbc6449aebe200588f40db1c719de0fbac1 Mon Sep 17 00:00:00 2001 From: "Paul \"LeoNerd\" Evans" Date: Thu, 9 Dec 2021 18:36:53 +0000 Subject: Fix indirect call of ->import --- lib/File/Copy.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lib/File') diff --git a/lib/File/Copy.pm b/lib/File/Copy.pm index 57bf6a4c4a..1c72dfebbe 100644 --- a/lib/File/Copy.pm +++ b/lib/File/Copy.pm @@ -44,8 +44,8 @@ sub carp { sub _catname { my($from, $to) = @_; if (not defined &basename) { - require File::Basename; - import File::Basename 'basename'; + require File::Basename; + File::Basename->import( 'basename' ); } return File::Spec->catfile($to, basename($from)); -- cgit v1.2.1