my $extra_packs = "";
my $ccache = 0;
my $noinit = 0;
+my $keep_packs = 0;
my @tofind = ();
my %to_build = ();
"extra-packs=s" => \$extra_packs,
"ccache" => \$ccache,
"noinit" => \$noinit,
+ "keep-packs" => \$keep_packs,
);
if ( $help ) {
push @args, "--uid $zuid:$zgid";
push @args, "--jobs 4";
push @args, "--no-init" if ($noinit == 1);
+ push @args, "--keep-packs" if ($keep_packs == 1);
push @args, "--cachedir $cache_dir";
push @args, "--dist $dist";
push @args, "--configdir $dist_configs";