diff --git a/perl/lib/Nix/Store.xs b/perl/lib/Nix/Store.xs index fefcd5ae6..1ca734e75 100644 --- a/perl/lib/Nix/Store.xs +++ b/perl/lib/Nix/Store.xs @@ -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)));