don't whine about octal numbers > 2^32. They're not portable, but
authorespie <espie@openbsd.org>
Sun, 5 Jan 2014 23:11:24 +0000 (23:11 +0000)
committerespie <espie@openbsd.org>
Sun, 5 Jan 2014 23:11:24 +0000 (23:11 +0000)
they work on all OpenBSD platforms.

Shuts up warning noticed by naddy@

usr.sbin/pkg_add/OpenBSD/Ustar.pm

index 66e2153..488d10e 100644 (file)
@@ -1,5 +1,5 @@
 # ex:ts=8 sw=4:
-# $OpenBSD: Ustar.pm,v 1.72 2012/04/28 12:00:10 espie Exp $
+# $OpenBSD: Ustar.pm,v 1.73 2014/01/05 23:11:24 espie Exp $
 #
 # Copyright (c) 2002-2007 Marc Espie <espie@openbsd.org>
 #
@@ -159,7 +159,10 @@ sub next
        $gid = oct($gid);
        $uid = $uidcache->lookup($uname, $uid);
        $gid = $gidcache->lookup($gname, $gid);
+       {
+       no warnings;
        $mtime = oct($mtime);
+       }
        unless ($prefix =~ m/^\0/o) {
                $prefix =~ s/\0*$//o;
                $name = "$prefix/$name";