From d0a92b7531274a71352c3620a77cbe81b18b7232 Mon Sep 17 00:00:00 2001
From: Ludovic Courtès <ludo@gnu.org>
Date: Fri, 1 Jun 2012 23:29:55 +0200
Subject: Move `sha256' to (guix utils).

* guix/derivations.scm (sha256): Move to...
* guix/utils.scm (sha256): ... here.
---
 guix/derivations.scm | 6 ------
 1 file changed, 6 deletions(-)

(limited to 'guix/derivations.scm')

diff --git a/guix/derivations.scm b/guix/derivations.scm
index 9bdcdacf1f..3faffd0e61 100644
--- a/guix/derivations.scm
+++ b/guix/derivations.scm
@@ -25,9 +25,6 @@
   #:use-module (ice-9 match)
   #:use-module (ice-9 rdelim)
   #:use-module (guix store)
-  #:use-module ((chop hash)
-                #:select (bytevector-hash
-                          hash-method/sha256))
   #:export (derivation?
             derivation-outputs
             derivation-inputs
@@ -187,9 +184,6 @@ that form."
                       env-vars))
      (display ")" port))))
 
-(define (sha256 bv)
-  "Return the SHA256 of BV as a bytevector."
-  (bytevector-hash hash-method/sha256 bv))
 
 (define (derivation-hash drv)      ; `hashDerivationModulo' in derivations.cc
   "Return the hash of DRV, modulo its fixed-output inputs, as a bytevector."
-- 
cgit v1.2.3