Changeset 2278 for lang/perl/Class-Hookable

Timestamp:

12/02/07 10:51:42 (13 months ago)

Author:

nyarla

Message:

lang/perl/Class-Hookable: I renamed method: registered_plugins -> registered_callbacks.

Location:

lang/perl/Class-Hookable/trunk

Files:

• lib/Class/Hookable.pm (modified) (4 diffs)
• t/03_utility/01_registered_callbacks.t (moved) (moved from lang/perl/Class-Hookable/trunk/t/03_utility/01_registered_plugins) (1 diff)
• t/03_utility/03_delete_hook.t (modified) (1 diff)

lang/perl/Class-Hookable/trunk/lib/Class/Hookable.pm

@@ -148 +148 @@
 }
 
-sub registered_plugins {
+sub registered_callbacks {
     my ( $self, $hook ) = @_;
 
@@ -173 +173 @@
 
         my @actions = ();
-        for my $action ( $self->registered_plugins( $hook ) ) {
+        for my $action ( $self->registered_callbacks( $hook ) ) {
             my $plugin  = $action->{'plugin'};
             my $class   = ref $plugin || $plugin;
@@ -216 +216 @@
     my $context = ( defined $self->hookable_context ) ? $self->hookable_context : $self ;
 
-    for my $action ( $self->registered_plugins( $hook ) ) {
+    for my $action ( $self->registered_callbacks( $hook ) ) {
         if ( $self->hookable_call_filter( 'run_hook', $hook, $args, $action ) ) {
             my $plugin = $action->{'plugin'};
@@ -530 +530 @@
 the hook name with which a plugin is registered is returned.
 
-=head2 registered_plugins
-
-  for my $action ( $hook->registered_plugins('hook.name') ) {
+=head2 registered_callbacks
+
+  for my $action ( $hook->registered_callbacks('hook.name') ) {
       my ( $plugin, $callback ) = @{ $action }{qw( plugin callback )};
       # some code

lang/perl/Class-Hookable/trunk/t/03_utility/01_registered_callbacks.t

@@ -24 +24 @@
 
 is_deeply(
-    [ $hook->registered_plugins('aaa.bbb') ],
+    [ $hook->registered_callbacks('aaa.bbb') ],
     [
         { plugin => $pluginA, callback => $pluginA->can('foo') },

lang/perl/Class-Hookable/trunk/t/03_utility/03_delete_hook.t

@@ -33 +33 @@
 
 is_deeply(
-    [ $hook->registered_plugins('hook.B') ],
+    [ $hook->registered_callbacks('hook.B') ],
     [],
 );