Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

need to use get_or_add here

  • Loading branch information...
commit 7f2affb7063e408d071121e55c1a2ce271fc6f75 1 parent c1b7e19
@doy doy authored committed
Showing with 2 additions and 2 deletions.
  1. +2 −2 lib/MooseX/Role/WithOverloading/Meta/Role/Application.pm
View
4 lib/MooseX/Role/WithOverloading/Meta/Role/Application.pm
@@ -1,7 +1,7 @@
package MooseX::Role::WithOverloading::Meta::Role::Application;
# ABSTRACT: Role application role for Roles which support overloading
-use Moose::Role;
+use Moose::Role 1.15;
use overload ();
use MooseX::Types::Moose qw/ArrayRef Str/;
use namespace::autoclean;
@@ -53,7 +53,7 @@ sub apply_overloading {
$other->add_package_symbol('$()' => $role->get_package_symbol('$()'))
if $role->has_package_symbol('$()');
# register with magic by touching
- $other->get_package_symbol('%OVERLOAD')->{dummy}++;
+ $other->get_or_add_package_symbol('%OVERLOAD')->{dummy}++;
for my $op (@{ $self->overload_ops }) {
my $code_sym = '&(' . $op;
Please sign in to comment.
Something went wrong with that request. Please try again.