From 11cd4c0c774ec9b86a7a41b2259da8cd7b507c41 Mon Sep 17 00:00:00 2001 From: espie Date: Mon, 28 Jan 2013 10:50:46 +0000 Subject: [PATCH] don't bother dumping distfiles, history is quite enough --- infrastructure/bin/dpb | 5 +---- infrastructure/lib/DPB/Fetch.pm | 11 +---------- 2 files changed, 2 insertions(+), 14 deletions(-) diff --git a/infrastructure/bin/dpb b/infrastructure/bin/dpb index 84092fdf3a6..b211d22c5c8 100755 --- a/infrastructure/bin/dpb +++ b/infrastructure/bin/dpb @@ -1,7 +1,7 @@ #! /usr/bin/perl # ex:ts=8 sw=4: -# $OpenBSD: dpb,v 1.80 2013/01/28 10:14:17 espie Exp $ +# $OpenBSD: dpb,v 1.81 2013/01/28 10:50:46 espie Exp $ # # Copyright (c) 2010 Marc Espie # @@ -745,9 +745,6 @@ my $occupied = 0; if ($state->{all}) { $state->engine->dump_dependencies; - if ($state->opt('f')) { - DPB::Distfile->dump($state->{logger}); - } if (!$state->defines('NO_HISTORY')) { if ($state->grabber->expire_old_distfiles($core, $state->opt('e'))) { diff --git a/infrastructure/lib/DPB/Fetch.pm b/infrastructure/lib/DPB/Fetch.pm index e9394d07051..693e4d77ef7 100644 --- a/infrastructure/lib/DPB/Fetch.pm +++ b/infrastructure/lib/DPB/Fetch.pm @@ -1,5 +1,5 @@ # ex:ts=8 sw=4: -# $OpenBSD: Fetch.pm,v 1.46 2013/01/13 14:03:20 espie Exp $ +# $OpenBSD: Fetch.pm,v 1.47 2013/01/28 10:50:46 espie Exp $ # # Copyright (c) 2010 Marc Espie # @@ -66,15 +66,6 @@ sub new $cache->{$full} //= $class->create($full, $file, @r); } -sub dump -{ - my ($class, $logger) = @_; - my $log = $logger->create("fetch/distfiles"); - for my $f (sort map {$_->{name}} grep {defined $_} values %$cache) { - print $log $f, "\n"; - } -} - sub logname { my $self = shift;