mirror of
https://github.com/NixOS/nix.git
synced 2024-11-22 06:42:28 +00:00
nix-perl: Fix segfault in queryPathInfo)
This commit is contained in:
parent
d37dc71e3c
commit
5e086ba8c3
@ -102,7 +102,7 @@ SV * queryPathInfo(char * path, int base32)
|
||||
PPCODE:
|
||||
try {
|
||||
auto info = store()->queryPathInfo(store()->parseStorePath(path));
|
||||
if (info->deriver)
|
||||
if (!info->deriver)
|
||||
XPUSHs(&PL_sv_undef);
|
||||
else
|
||||
XPUSHs(sv_2mortal(newSVpv(store()->printStorePath(*info->deriver).c_str(), 0)));
|
||||
|
Loading…
Reference in New Issue
Block a user