From 46727e3a9d47f4c525d726ee61410dcf1745ca57 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Fri, 26 Oct 2018 23:51:56 +0200
Subject: pack: Remove unused variable.

* guix/scripts/pack.scm (self-contained-tarball)[libgcrypt]: Remove.
---
 guix/scripts/pack.scm | 4 ----
 1 file changed, 4 deletions(-)

(limited to 'guix/scripts/pack.scm')

diff --git a/guix/scripts/pack.scm b/guix/scripts/pack.scm
index b7b4e22bbe..392e4b5344 100644
--- a/guix/scripts/pack.scm
+++ b/guix/scripts/pack.scm
@@ -117,10 +117,6 @@ with a properly initialized store database.
 
 SYMLINKS must be a list of (SOURCE -> TARGET) tuples denoting symlinks to be
 added to the pack."
-  (define libgcrypt
-    (module-ref (resolve-interface '(gnu packages gnupg))
-                'libgcrypt))
-
   (define schema
     (and localstatedir?
          (local-file (search-path %load-path
-- 
cgit v1.2.3