Changeset 3681 for lang/perl/Archer

Show
Ignore:
Timestamp:
12/28/07 11:23:11 (6 years ago)
Author:
tokuhirom
Message:

r3612@mnk (orig r262): tokuhiro | 2007-02-14 20:22:02 -0800
enable the --skip=foo option.


Location:
lang/perl/Archer
Files:
2 modified

Legend:

Unmodified
Added
Removed
  • lang/perl/Archer/archer.pl

    r3678 r3681  
    3333            dry_run_fg     => $dry_run_fg, 
    3434            parallel_num   => $fork_num, 
    35             skips          => $skips, 
     35            skips          => +{ map { $_ => 1 } split /,/, $skips}, 
    3636            config_yaml    => $config, 
    3737            argv_str       => $argv_str, 
  • lang/perl/Archer/lib/Archer.pm

    r3673 r3681  
    4545    $self->log('info' => "run hook $hook"); 
    4646    for my $plugin (@{ $self->{config}->{tasks}->{$hook} }) { 
     47        if ($self->{skips}->{$plugin->{name}}) { 
     48            $self->log(info => "skipped: $plugin->{name}"); 
     49            next; 
     50        } 
     51 
    4752        my $class = "Archer::Plugin::$plugin->{module}"; 
    4853        $self->log('debug' => "load $class");