Files
perl-Data-Package/defined-array.patch

12 lines
401 B
Diff

--- Data-Package-1.05.orig/lib/Data/Package.pm 2007-11-20 03:14:06.000000000 +0100
+++ Data-Package-1.05/lib/Data/Package.pm 2020-02-21 16:02:25.128213304 +0100
@@ -243,7 +243,7 @@
# If the class has a @PROVIDES array, we'll use that directly.
no strict 'refs';
- if ( defined @{"${class}::PROVIDES"} ) {
+ if ( defined *{"${class}::PROVIDES"}{ARRAY}) {
return @{"${class}::PROVIDES"};
}