Guest User

Untitled

a guest
Jun 21st, 2018
86
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.57 KB | None | 0 0
  1. ##My change to Sub::Defer and error
  2.  
  3. sub _install_modifier {
  4. my ($into, $type, $name, $code) = @_;
  5. my $ref = ref(my $to_modify = $into->can($name));
  6.  
  7. require Sub::Defer;
  8. warn "FFFFFFFFFFFFFFFFFFFFFFFF $into, $type, $name, $code";
  9. warn "FFFFFFFFFFFFFFFFFFFFFFFF $to_modify";
  10. Sub::Defer::undefer_sub($to_modify);
  11.  
  12. require Class::Method::Modifiers;
  13. Class::Method::Modifiers::install_modifier(@_);
  14. }
  15.  
  16.  
  17. FFFFFFFFFFFFFFFFFFFFFFFF DBIx::Class::Storage::DBI::Replicated::Replicant, around, _query_start, CODE(0x100f31470) at /Users/johnn/Desktop/Moo/lib/Moo/_Utils.pm line 15.
Add Comment
Please, Sign In to add comment