From 1a14283771a9d1983e743bb08fcba2dba23caa3e Mon Sep 17 00:00:00 2001 From: Marc Espie Date: Mon, 22 Aug 2005 11:34:53 +0000 Subject: likewise, report only the first three files --- usr.sbin/pkg_add/OpenBSD/Delete.pm | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) (limited to 'usr.sbin/pkg_add/OpenBSD') diff --git a/usr.sbin/pkg_add/OpenBSD/Delete.pm b/usr.sbin/pkg_add/OpenBSD/Delete.pm index 37080c30f0d..64e3d0e7afb 100644 --- a/usr.sbin/pkg_add/OpenBSD/Delete.pm +++ b/usr.sbin/pkg_add/OpenBSD/Delete.pm @@ -1,5 +1,5 @@ # ex:ts=8 sw=4: -# $OpenBSD: Delete.pm,v 1.26 2005/08/17 09:19:09 espie Exp $ +# $OpenBSD: Delete.pm,v 1.27 2005/08/22 11:34:52 espie Exp $ # # Copyright (c) 2003-2004 Marc Espie # @@ -109,7 +109,13 @@ sub validate_plist($$) my $s = OpenBSD::Vstat::remove($fname, $item->{size}); next unless defined $s; if ($s->{ro}) { - Warn "Error: ", $s->{dev}, " is read-only ($fname)\n"; + if ($state->{very_verbose} or ++($s->{problems}) < 4) { + Warn "Error: ", $s->{dev}, + " is read-only ($fname)\n"; + } elsif ($s->{problems} == 4) { + Warn "Error: ... more files can't be removed from ", + $s->{dev}, "\n"; + } $problems++; } } -- cgit v1.2.3