diff options
Diffstat (limited to 'lib/attributes.pm')
| -rw-r--r-- | lib/attributes.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/attributes.pm b/lib/attributes.pm index 714cb26721..544e2f5f7a 100644 --- a/lib/attributes.pm +++ b/lib/attributes.pm @@ -1,6 +1,6 @@ package attributes; -our $VERSION = 0.06; +our $VERSION = 0.07; @EXPORT_OK = qw(get reftype); @EXPORT = (); @@ -43,7 +43,7 @@ sub import { my @badattrs; if ($pkgmeth) { my @pkgattrs = _modify_attrs($svref, @attrs); - @badattrs = $pkgmeth->($home_stash, $svref, @attrs); + @badattrs = $pkgmeth->($home_stash, $svref, @pkgattrs); if (!@badattrs && @pkgattrs) { return unless _warn_reserved; @pkgattrs = grep { m/\A[[:lower:]]+(?:\z|\()/ } @pkgattrs; |