From 216440b3ff1431beca7784c7ae76cb5e75446953 Mon Sep 17 00:00:00 2001
From: Eelco Dolstra <e.dolstra@tudelft.nl>
Date: Tue, 29 Nov 2011 12:32:55 +0000
Subject: * For consistency with "nix-store -q --hash", produce hashes in  
 base-32.  (This affects Hydra manifests.)

---
 perl/lib/Nix/Store.xs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl')

diff --git a/perl/lib/Nix/Store.xs b/perl/lib/Nix/Store.xs
index b50451f45f10..aac7761cbd80 100644
--- a/perl/lib/Nix/Store.xs
+++ b/perl/lib/Nix/Store.xs
@@ -67,7 +67,7 @@ SV * queryPathHash(char * path)
         try {
             doInit();
             Hash hash = store->queryPathHash(path);
-            string s = "sha256:" + printHash(hash);
+            string s = "sha256:" + printHash32(hash);
             XPUSHs(sv_2mortal(newSVpv(s.c_str(), 0)));
         } catch (Error & e) {
             croak(e.what());
-- 
cgit 1.4.1