lib/Catalyst/TraitFor/Request/ProxyBase.pm

   1 package Catalyst::TraitFor::Request::ProxyBase;
   2 use Moose::Role;
   3 use namespace::autoclean;
   4
   5 requires 'base';
   6
   7 around 'base' => sub {
   8     my ($orig, $self, @args) = @_;
   9     my $ret = $self->$orig(@args);
  10     # FIXME - Mangle here.
  11     return $ret;
  12 };
  13
  14 1;
  15
  16 __END__
  17
  18 =head1 NAME
  19
  20 Catalyst::TraitFor::Request::ProxyBase -
  21
  22 =cut
  23