diff options
| author | Marc Espie <espie@cvs.openbsd.org> | 2014-09-20 09:35:55 +0000 |
|---|---|---|
| committer | Marc Espie <espie@cvs.openbsd.org> | 2014-09-20 09:35:55 +0000 |
| commit | ac0c3bf2e7f4349b24bd021dbc1988f6067ecb8b (patch) | |
| tree | 59968f399e1d4adf4f6cf02b6f60710214654921 /regress | |
| parent | 0411143cd661f91b47c9954540de13edb2010671 (diff) | |
texlive blasts thru the 999 chunks barrier
Diffstat (limited to 'regress')
| -rwxr-xr-x | regress/usr.sbin/pkg_add/extract_chunks | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/regress/usr.sbin/pkg_add/extract_chunks b/regress/usr.sbin/pkg_add/extract_chunks index 4d8eeae700d..6839add0a55 100755 --- a/regress/usr.sbin/pkg_add/extract_chunks +++ b/regress/usr.sbin/pkg_add/extract_chunks @@ -1,7 +1,7 @@ #! /usr/bin/perl # ex:ts=8 sw=4: -# $OpenBSD: extract_chunks,v 1.1 2014/09/20 08:01:31 espie Exp $ +# $OpenBSD: extract_chunks,v 1.2 2014/09/20 09:35:54 espie Exp $ # # Copyright (c) 2014 Marc Espie <espie@openbsd.org> # @@ -41,7 +41,7 @@ for my $f (@ARGV) { while (1) { $i++; # build chunk name in the current directory - my $out ="$stem.tar.".sprintf("%03d", $i); + my $out ="$stem.tar.".sprintf("%04d", $i); open my $fh, ">", $out or die "Can't open chunk $out: $!"; while (1) { my $r = $z->read($buffer, $length); |