too many todo. Use unambiguous names, since they're not the same operation
authorespie <espie@openbsd.org>
Sun, 4 Jan 2015 14:10:20 +0000 (14:10 +0000)
committerespie <espie@openbsd.org>
Sun, 4 Jan 2015 14:10:20 +0000 (14:10 +0000)
at all

usr.sbin/pkg_add/OpenBSD/AddCreateDelete.pm
usr.sbin/pkg_add/OpenBSD/AddDelete.pm
usr.sbin/pkg_add/OpenBSD/Signer.pm
usr.sbin/pkg_add/OpenBSD/Ustar.pm

index c9ba25d..670728f 100644 (file)
@@ -1,5 +1,5 @@
 # ex:ts=8 sw=4:
-# $OpenBSD: AddCreateDelete.pm,v 1.27 2014/11/30 15:56:15 espie Exp $
+# $OpenBSD: AddCreateDelete.pm,v 1.28 2015/01/04 14:10:20 espie Exp $
 #
 # Copyright (c) 2007-2014 Marc Espie <espie@openbsd.org>
 #
@@ -142,7 +142,7 @@ sub ntogo_string
 {
        my ($self, $offset) = @_;
 
-       return $self->todo($offset // 0);
+       return $self->ntodo($offset // 0);
 }
 
 OpenBSD::Auto::cache(signer_list,
index 2d72ea6..17ad476 100644 (file)
@@ -1,5 +1,5 @@
 # ex:ts=8 sw=4:
-# $OpenBSD: AddDelete.pm,v 1.69 2014/12/03 22:41:11 espie Exp $
+# $OpenBSD: AddDelete.pm,v 1.70 2015/01/04 14:10:20 espie Exp $
 #
 # Copyright (c) 2007-2010 Marc Espie <espie@openbsd.org>
 #
@@ -220,7 +220,7 @@ sub syslog
        Sys::Syslog::syslog('info', $self->f(@_));
 }
 
-sub todo
+sub ntodo
 {
        my ($state, $offset) = @_;
        return $state->tracker->sets_todo($offset);
index 0e6f5a3..9415bca 100644 (file)
@@ -1,6 +1,6 @@
 #! /usr/bin/perl
 # ex:ts=8 sw=4:
-# $OpenBSD: Signer.pm,v 1.5 2014/09/20 09:04:31 espie Exp $
+# $OpenBSD: Signer.pm,v 1.6 2015/01/04 14:10:20 espie Exp $
 #
 # Copyright (c) 2003-2014 Marc Espie <espie@openbsd.org>
 #
@@ -174,7 +174,7 @@ sub add_signature
        $sig->{b64sig} = $state->{signer}->compute_signature($state, $plist);
 }
 
-sub todo
+sub ntodo
 {
        my ($self, $offset) = @_;
        return sprintf("%u/%u", $self->{done}-$offset, $self->{total});
index 3972b4b..fbea010 100644 (file)
@@ -1,5 +1,5 @@
 # ex:ts=8 sw=4:
-# $OpenBSD: Ustar.pm,v 1.85 2014/11/20 11:39:29 espie Exp $
+# $OpenBSD: Ustar.pm,v 1.86 2015/01/04 14:10:20 espie Exp $
 #
 # Copyright (c) 2002-2014 Marc Espie <espie@openbsd.org>
 #
@@ -512,7 +512,7 @@ sub errsay
        my ($self, @args) = @_;
        $self->{archive}{state}->errsay(@args);
 }
-sub todo
+sub left_todo
 {
        my ($self, $toread) = @_;
        return if $toread == 0;
@@ -840,7 +840,7 @@ sub create
                }
 
                $toread -= $actual;
-               $self->todo($toread);
+               $self->left_todo($toread);
        }
        $out->close or $self->fatal("Error closing #1#2: #3",
            $self->{destdir}, $self->name, $!);
@@ -907,7 +907,7 @@ sub write_contents
                }
 
                $toread -= $actual;
-               $self->todo($toread);
+               $self->left_todo($toread);
        }
        if ($size % 512) {
                print $out "\0" x (512 - $size % 512) or