Bug 11190: (QA followup) for tests on jenkins

When moving from Moose to Moo we didn't address a minor syntax change
Moo introduces. This patch fixes that.

Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
This commit is contained in:
Frédéric Demians 2015-08-31 15:26:10 +02:00 committed by Tomas Cohen Arazi
parent 9f0170668c
commit e9bf6846bb
2 changed files with 7 additions and 7 deletions

View File

@ -28,7 +28,7 @@ has url => ( is => 'rw', );
has dir => (
is => 'rw',
default => '.',
default => sub { '.' },
trigger => sub {
my ($self, $dir) = @_;
unless (-d $dir) {
@ -38,15 +38,15 @@ has dir => (
}
);
has short => ( is => 'rw', default => 1 );
has short => ( is => 'rw', default => sub { 1 } );
has verbose => ( is => 'rw', default => 0 );
has verbose => ( is => 'rw', default => sub { 0 } );
has sth => ( is => 'rw' );
has writer => ( is => 'rw', );
has count => ( is => 'rw', default => 0);
has count => ( is => 'rw', default => sub { 0 } );
sub run {

View File

@ -31,9 +31,9 @@ my $MAX = 50000;
has sitemapper => (is => 'rw', );
has current => ( is => 'rw', default => $MAX );
has current => ( is => 'rw', default => sub { $MAX } );
has count => ( is => 'rw', default => 0 );
has count => ( is => 'rw', default => sub { 0 } );
has writer => ( is => 'rw', );
@ -122,4 +122,4 @@ sub end {
}
1;
1;