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:
espie 2010-05-22 08:43:18 +00:00
parent fcbad9512f
commit 8dcbdcc0c8

View File

@ -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";
}
}