create a $state->todo method to account for sets to install.

have tracker keep track of sets not done, and ask it directly for how many
there's still to do. Provide an offset into next for cases where we know
we already did a set but haven't accounted for it yet.
-> more accurate number of sets still to do.

1 files changed, 7 insertions, 1 deletions

diff --git a/usr.sbin/pkg_add/pkg_delete b/usr.sbin/pkg_add/pkg_delete
index 8c53c8613d2..96eabcc107d 100644
--- a/usr.sbin/pkg_add/pkg_delete
+++ b/usr.sbin/pkg_add/pkg_delete
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 # ex:ts=8 sw=4:
-# $OpenBSD: pkg_delete,v 1.128 2009/11/28 10:05:58 espie Exp $
+# $OpenBSD: pkg_delete,v 1.129 2009/12/19 14:21:14 espie Exp $
 #
 # Copyright (c) 2003-2007 Marc Espie <espie@openbsd.org>
 #
@@ -24,6 +24,12 @@ use OpenBSD::AddDelete;
 package OpenBSD::State;
 our @ISA=(qw(OpenBSD::UI));
 
+sub todo
+{
+	my $state = shift;
+	return $state->{todo};
+}
+
 package OpenBSD::AddDelete;
 our ($state, %defines, $bad, $opt_B);