Content deleted Content added
m Reverted 1 edit by 50.224.156.210 (talk) to last revision by AnomieBOT |
Updating published sources: SourceUploader: * Fix silly error. |
||
Line 65:
my $class=shift;
my $self=$class->SUPER::new();
$self->{'loadexisting'}=1;
$self->{'order'}=-1000;
$self->{'fail'}=0;
return $self;▼
}
sub build_sources {
my $self = shift;
my $basedir=$AnomieBOT::API::basedir;
Line 75 ⟶ 79:
$self->{'fail'}=1;
AnomieBOT::API->warn("Cannot find source directory\n");
return
}
Line 82 ⟶ 86:
$self->{'fail'}=1;
AnomieBOT::API->warn("Cannot load changelog: $!\n");
return
}
local $_;
Line 114 ⟶ 118:
$self->{'fail'}=1;
AnomieBOT::API->warn("Cannot open directory $dir: $!\n");
return
}
Line 134 ⟶ 138:
$self->{'fail'}=1;
AnomieBOT::API->warn("Cannot open file $p: $!\n");
return
}
do {
Line 284 ⟶ 288:
$self->{'pages'}={%pages};
$self->{'tasklists'}=\%tasklists;
▲ return $self;
}
Line 290 ⟶ 293:
my ($self, $api)=@_;
return undef if $self->{'fail'};
$self->build_sources() unless defined( $self->{'pages'} );
return undef if $self->{'fail'};
|