Changeset 354
- Timestamp:
- 01/17/07 22:41:06 (2 years ago)
- Files:
-
- library/perl/trunk/Assurer/lib/Assurer.pm (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
library/perl/trunk/Assurer/lib/Assurer.pm
r352 r354 5 5 use Carp; 6 6 7 use version; 8 our $VERSION = qv('0.0.1'); 7 use version;our $VERSION = qv('0.0.1'); 9 8 10 9 use base qw( Class::Accessor::Fast ); … … 86 85 87 86 for my $plugin ( @{ $self->{hooks}->{$hook} || [] } ) { 88 if ( $hook eq 'test' and $self->{hosts} ) {87 if ( $hook eq 'test' and $self->{hosts} and !defined $plugin->{config}->{host} ) { 89 88 for my $host ( @{ $self->{hosts} } ) { 90 89 next if ( $plugin->{role} and ( !defined $host->{role} or $host->{role} ne $plugin->{role} ) );
