# ex:ts=8 sw=4:
-# $OpenBSD: AddCreateDelete.pm,v 1.28 2015/01/04 14:10:20 espie Exp $
+# $OpenBSD: AddCreateDelete.pm,v 1.29 2015/01/04 14:20:04 espie Exp $
#
# Copyright (c) 2007-2014 Marc Espie <espie@openbsd.org>
#
{
my ($self, $offset) = @_;
- return $self->ntodo($offset // 0);
+ return $self->{wantntogo} ?
+ $self->f(" (#1)", $self->ntodo($offset // 0)) :
+ $self->f("");
}
OpenBSD::Auto::cache(signer_list,
# ex:ts=8 sw=4:
-# $OpenBSD: AddDelete.pm,v 1.70 2015/01/04 14:10:20 espie Exp $
+# $OpenBSD: AddDelete.pm,v 1.71 2015/01/04 14:20:04 espie Exp $
#
# Copyright (c) 2007-2010 Marc Espie <espie@openbsd.org>
#
$object = "Parameters";
}
- $state->say($what." #1 (#2)", $object, $state->ntogo_string);
+ $state->say($what." #1#2", $object, $state->ntogo_string);
if ($state->defines('carp')) {
require Carp;
Carp::cluck("currently here");
# ex:ts=8 sw=4:
-# $OpenBSD: Term.pm,v 1.29 2014/12/22 14:24:56 espie Exp $
+# $OpenBSD: Term.pm,v 1.30 2015/01/04 14:20:04 espie Exp $
#
# Copyright (c) 2004-2007 Marc Espie <espie@openbsd.org>
#
sub ntogo
{
my ($self, $state, $offset) = @_;
- return $state->ntogo_string($offset);
+ return $state->ntodo($offset // 0);
}
sub compute_count
# ex:ts=8 sw=4:
-# $OpenBSD: Update.pm,v 1.161 2014/02/02 15:22:36 espie Exp $
+# $OpenBSD: Update.pm,v 1.162 2015/01/04 14:20:04 espie Exp $
#
# Copyright (c) 2004-2014 Marc Espie <espie@openbsd.org>
#
{
my ($self, $state, @r) = @_;
my $msg = $state->f(@r);
- if ($state->{wantntogo}) {
- $msg .= " (".$state->ntogo.")";
- }
+ $msg .= $state->ntogo_string;
$state->progress->message($msg);
$state->say($msg) if $state->verbose >= 2;
}
}
return undef;
}
- $state->say("Update candidates: #1 -> #2 (#3)", $pkgname,
- join(' ', map {$_->name} @$l), $state->ntogo) if $state->verbose;
+ $state->say("Update candidates: #1 -> #2#3", $pkgname,
+ join(' ', map {$_->name} @$l), $state->ntogo_string)
+ if $state->verbose;
my $r = $state->choose_location($pkgname, $l);
if (defined $r) {