diff options
Diffstat (limited to 'perl')
| -rw-r--r-- | perl/lib/Nix/Store.xs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl/lib/Nix/Store.xs b/perl/lib/Nix/Store.xs index 697fd79f9b09..6b137a13c414 100644 --- a/perl/lib/Nix/Store.xs +++ b/perl/lib/Nix/Store.xs @@ -288,8 +288,8 @@ SV * makeFixedOutputPath(int recursive, char * algo, char * hash, char * name) PPCODE: try { HashType ht = parseHashType(algo); - Path path = store()->makeFixedOutputPath(recursive, ht, - parseHash16or32(ht, hash), name); + Hash h = parseHash16or32(ht, hash); + Path path = store()->makeFixedOutputPath(recursive, h, name); XPUSHs(sv_2mortal(newSVpv(path.c_str(), 0))); } catch (Error & e) { croak("%s", e.what()); |