Fix Perl warning about $path masking earlier definition

This commit is contained in:
Eelco Dolstra 2013-06-02 23:32:09 +02:00
parent 8e246a835a
commit f4ecf27def

View file

@ -170,9 +170,9 @@ sub defaultUriForProduct {
sub checkPath {
my ($self, $c, $path) = @_;
my $path = pathIsInsidePrefix($path, $Nix::Config::storeDir);
error($c, "Build product refers outside of the Nix store.") unless defined $path;
return $path;
my $p = pathIsInsidePrefix($path, $Nix::Config::storeDir);
error($c, "Build product refers outside of the Nix store.") unless defined $p;
return $p;
}