From bb8c76cbb61d468faf5a48d4ad4158402dd7d97b Mon Sep 17 00:00:00 2001 From: Lars Dieckow Date: Tue, 23 Apr 2013 14:25:37 +0200 Subject: [PATCH] export more Moose --- lib/Sipwise/Base.pm | 2 +- t/exports.t | 3 ++- 2 files changed, 3 insertions(+), 2 deletions(-) diff --git a/lib/Sipwise/Base.pm b/lib/Sipwise/Base.pm index dab47e3..87d3032 100644 --- a/lib/Sipwise/Base.pm +++ b/lib/Sipwise/Base.pm @@ -15,7 +15,7 @@ sub import { package $caller; use lambda 'λ'; use perl5i::2 -skip => [qw(Signatures Try::Tiny)]; -use Moose qw(extends has with); +use Moose qw(after augment before extends has inner override super with); use MooseX::Method::Signatures; use TryCatch; diff --git a/t/exports.t b/t/exports.t index 3f1b6cf..baa3695 100644 --- a/t/exports.t +++ b/t/exports.t @@ -25,7 +25,8 @@ eval { }; ok !$@, 'switch syntax is available'; -ok(__PACKAGE__->can($_), "$_ function name is available") for qw(λ extends with has method list); +ok(__PACKAGE__->can($_), "$_ function name is available") + for qw(λ after augment before extends has inner override super with method list); eval 'use t::MethodSignatures'; try {