From 5e086ba8c39fc5c39cbbe452b33313c4e5782cd2 Mon Sep 17 00:00:00 2001 From: Eelco Dolstra Date: Tue, 10 Mar 2020 11:00:17 +0100 Subject: nix-perl: Fix segfault in queryPathInfo) --- perl/lib/Nix/Store.xs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl/lib/Nix/Store.xs') 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))); -- cgit v1.2.3