From: espie Date: Sun, 5 Jan 2014 23:11:24 +0000 (+0000) Subject: don't whine about octal numbers > 2^32. They're not portable, but X-Git-Url: http://artulab.com/gitweb/?a=commitdiff_plain;h=6a137387952e922d4e11383c4365bfe91f2b6bc6;p=openbsd don't whine about octal numbers > 2^32. They're not portable, but they work on all OpenBSD platforms. Shuts up warning noticed by naddy@ --- diff --git a/usr.sbin/pkg_add/OpenBSD/Ustar.pm b/usr.sbin/pkg_add/OpenBSD/Ustar.pm index 66e21531fd7..488d10e370f 100644 --- a/usr.sbin/pkg_add/OpenBSD/Ustar.pm +++ b/usr.sbin/pkg_add/OpenBSD/Ustar.pm @@ -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 # @@ -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";