X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fforeign%2FMooseX-Method-Signatures%2Fcaller.t;fp=t%2Fforeign%2FMooseX-Method-Signatures%2Fcaller.t;h=d434be7e178e17cf7aa1139a40e3cfc801be6823;hb=1a52f2db46f6d870454428a07bfae09e0359eeee;hp=cbf009a201f47cb63382f28ddd7da3e4fda9fe2a;hpb=ff265988561375d3cf480004e29e3891094c0afb;p=p5sagit%2FFunction-Parameters.git diff --git a/t/foreign/MooseX-Method-Signatures/caller.t b/t/foreign/MooseX-Method-Signatures/caller.t index cbf009a..d434be7 100644 --- a/t/foreign/MooseX-Method-Signatures/caller.t +++ b/t/foreign/MooseX-Method-Signatures/caller.t @@ -3,19 +3,19 @@ use warnings FATAL => 'all'; use Test::More tests => 1; { - package TestClass; + package TestClass; - use Function::Parameters qw(:strict); + use Function::Parameters qw(:strict); - use Carp (); + use Carp (); - method callstack_inner($class:) { - return Carp::longmess("Callstack is"); - } + method callstack_inner($class:) { + return Carp::longmess("Callstack is"); + } - method callstack($class:) { - return $class->callstack_inner; - } + method callstack($class:) { + return $class->callstack_inner; + } } my $callstack = TestClass->callstack();