report pkgname that didn't build. This should help track down the
todo=<nothing> errors the other frogs are seeing.
This commit is contained in:
parent
fcbad9512f
commit
8dcbdcc0c8
@ -1,5 +1,5 @@
|
||||
# ex:ts=8 sw=4:
|
||||
# $OpenBSD: PortBuilder.pm,v 1.7 2010/05/04 09:45:41 espie Exp $
|
||||
# $OpenBSD: PortBuilder.pm,v 1.8 2010/05/22 08:43:18 espie Exp $
|
||||
#
|
||||
# Copyright (c) 2010 Marc Espie <espie@openbsd.org>
|
||||
#
|
||||
@ -51,11 +51,17 @@ sub init
|
||||
$self->{global} = $self->{logger}->open("build");
|
||||
}
|
||||
|
||||
sub check
|
||||
sub pkgfile
|
||||
{
|
||||
my ($self, $v) = @_;
|
||||
my $name = $v->fullpkgname;
|
||||
return -f "$self->{fullrepo}/$name.tgz";
|
||||
return "$self->{fullrepo}/$name.tgz";
|
||||
}
|
||||
|
||||
sub check
|
||||
{
|
||||
my ($self, $v) = @_;
|
||||
return -f $self->pkgfile($v);
|
||||
}
|
||||
|
||||
sub report
|
||||
@ -73,6 +79,8 @@ sub report
|
||||
if ($self->check($v)) {
|
||||
print $log "\n";
|
||||
} else {
|
||||
open my $fh, '>>', $job->{log};
|
||||
print $fh "Error: ", $self->pkgfile($v), " does not exist\n";
|
||||
print $log "!\n";
|
||||
}
|
||||
}
|
||||
|
Loading…
x
Reference in New Issue
Block a user