This is an automated email from the git hooks/post-receive script. gregoa pushed a commit to branch master in repository libuser-simple-perl.
commit 80d1072dd3e7366d9766aeeeae585874f0469db6 Author: gregor herrmann <gre...@debian.org> Date: Fri May 29 19:00:10 2015 +0200 Add patch to fix UNIVERSAL->import warning (5.20) / error (5.22). Closes: #614873 --- debian/patches/UNIVERSAL-import-deprecated.patch | 52 ++++++++++++++++++++++++ debian/patches/series | 1 + 2 files changed, 53 insertions(+) diff --git a/debian/patches/UNIVERSAL-import-deprecated.patch b/debian/patches/UNIVERSAL-import-deprecated.patch new file mode 100644 index 0000000..c802ea7 --- /dev/null +++ b/debian/patches/UNIVERSAL-import-deprecated.patch @@ -0,0 +1,52 @@ +Description: fix for + "UNIVERSAL->import is deprecated and will be removed in a future perl at ..." (5.20) + "Error: UNIVERSAL does not export anything" (5.22) +Origin: vendor +Bug: https://rt.cpan.org/Public/Bug/Display.html?id=103957 +Bug-Debian: https://bugs.debian.org/614873 +Forwarded: https://rt.cpan.org/Public/Bug/Display.html?id=103957 +Author: gregor herrmann <gre...@debian.org> +Last-Update: 2015-05-29 + +diff --git a/lib/User/Simple.pm b/lib/User/Simple.pm +index 108e93b..16e471b 100644 +--- a/lib/User/Simple.pm ++++ b/lib/User/Simple.pm +@@ -170,7 +170,6 @@ terms as Perl. + use Carp; + use Date::Calc qw(Today_and_Now Add_Delta_DHMS Delta_DHMS); + use Digest::MD5 qw(md5_hex); +-use UNIVERSAL qw(isa); + + our $AUTOLOAD; + our $VERSION = '1.45'; +@@ -200,7 +199,7 @@ sub new { + $init{debug} = 2 unless defined $init{debug}; + $init{adm_level} = 1 unless defined $init{adm_level}; + +- unless (defined($init{db}) and isa($init{db}, 'DBI::db')) { ++ unless (defined($init{db}) and $init{db}->isa('DBI::db')) { + carp "Mandatory db argument must be a valid (DBI) database handle"; + return undef; + } +diff --git a/lib/User/Simple/Admin.pm b/lib/User/Simple/Admin.pm +index 1b25545..14303e3 100644 +--- a/lib/User/Simple/Admin.pm ++++ b/lib/User/Simple/Admin.pm +@@ -209,7 +209,6 @@ terms as Perl. + + use Carp; + use Digest::MD5 qw(md5_hex); +-use UNIVERSAL qw(isa); + our $AUTOLOAD; + + ###################################################################### +@@ -222,7 +221,7 @@ sub new { + $table = shift; + + # Verify we got the right arguments +- unless (isa($db, 'DBI::db')) { ++ unless ($db->isa('DBI::db')) { + carp "First argument must be a DBI connection"; + return undef; + } diff --git a/debian/patches/series b/debian/patches/series new file mode 100644 index 0000000..61b1c59 --- /dev/null +++ b/debian/patches/series @@ -0,0 +1 @@ +UNIVERSAL-import-deprecated.patch -- Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libuser-simple-perl.git _______________________________________________ Pkg-perl-cvs-commits mailing list Pkg-perl-cvs-commits@lists.alioth.debian.org http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/pkg-perl-cvs-commits