Permalink
Browse files

Add install_modifier as a public API

  • Loading branch information...
1 parent 613e213 commit f6901e046c7ab73b16ded3afbe1dc4ecf8b569a7 @gfx gfx committed Oct 21, 2009
Showing with 8 additions and 2 deletions.
  1. +3 −0 Changes
  2. +5 −2 lib/Class/Method/Modifiers/Fast.pm
View
@@ -1,4 +1,7 @@
Revision history for Perl extension Class::Method::Modifiers::Fast
+0.02
+ * Add install_modifier as a public API (gfx)
+
0.01 Sun Jan 18 17:19:17 2009
* original version
@@ -6,15 +6,18 @@ our $VERSION = '0.01';
use base 'Exporter';
our @EXPORT = qw(before after around);
-our @EXPORT_OK = @EXPORT;
+our @EXPORT_OK = (@EXPORT, 'install_modifier');
our %EXPORT_TAGS = (
moose => [qw(before after around)],
all => \@EXPORT_OK,
);
use Carp 'confess';
-sub _install_modifier {
+sub _install_modifier; # -w
+*_install_modifier = \&install_modifier;
+
+sub install_modifier {
my $into = shift;
my $type = shift;
my $modifier = pop;

0 comments on commit f6901e0

Please sign in to comment.