forked from lix-project/lix
* nix-build: `--dry-run' flag.
This commit is contained in:
parent
a1d310b6b5
commit
7592f48c83
|
@ -9,6 +9,8 @@ my $addOutLink = 1;
|
||||||
my $outLink;
|
my $outLink;
|
||||||
my $drvLink;
|
my $drvLink;
|
||||||
|
|
||||||
|
my $dryRun = 0;
|
||||||
|
|
||||||
my @instArgs = ();
|
my @instArgs = ();
|
||||||
my @buildArgs = ();
|
my @buildArgs = ();
|
||||||
my @exprs = ();
|
my @exprs = ();
|
||||||
|
@ -89,6 +91,11 @@ EOF
|
||||||
push @buildArgs, ($arg, $ARGV[$n]);
|
push @buildArgs, ($arg, $ARGV[$n]);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
elsif ($arg eq "--dry-run") {
|
||||||
|
push @buildArgs, "--dry-run";
|
||||||
|
$dryRun = 1;
|
||||||
|
}
|
||||||
|
|
||||||
elsif (substr($arg, 0, 1) eq "-") {
|
elsif (substr($arg, 0, 1) eq "-") {
|
||||||
push @buildArgs, $arg;
|
push @buildArgs, $arg;
|
||||||
}
|
}
|
||||||
|
@ -133,6 +140,8 @@ foreach my $expr (@exprs) {
|
||||||
while (<OUTPATHS>) {chomp; push @outPaths, $_;}
|
while (<OUTPATHS>) {chomp; push @outPaths, $_;}
|
||||||
close OUTPATHS or exit 1;
|
close OUTPATHS or exit 1;
|
||||||
|
|
||||||
|
next if $dryRun;
|
||||||
|
|
||||||
foreach my $outPath (@outPaths) {
|
foreach my $outPath (@outPaths) {
|
||||||
my $target = readlink $outPath or die "cannot read symlink `$outPath'";
|
my $target = readlink $outPath or die "cannot read symlink `$outPath'";
|
||||||
print "$target\n";
|
print "$target\n";
|
||||||
|
|
Loading…
Reference in a new issue