From 8a705ae4c6107f43c7fbcfad913dd2675f94086a Mon Sep 17 00:00:00 2001
From: Ludovic Courtès <ludo@gnu.org>
Date: Sun, 29 Dec 2019 16:19:56 +0100
Subject: profiles: Add 'map-manifest-entries'.

* guix/scripts/pack.scm (map-manifest-entries): Move to...
* guix/profiles.scm (map-manifest-entries): ... here.
---
 guix/scripts/pack.scm | 5 -----
 1 file changed, 5 deletions(-)

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

diff --git a/guix/scripts/pack.scm b/guix/scripts/pack.scm
index 9676d28565..536cc1726c 100644
--- a/guix/scripts/pack.scm
+++ b/guix/scripts/pack.scm
@@ -753,11 +753,6 @@ last resort for relocation."
                  (manifest-entry-output entry)
                  args))))
 
-(define (map-manifest-entries proc manifest)
-  "Apply PROC to all the entries of MANIFEST and return a new manifest."
-  (make-manifest
-   (map proc (manifest-entries manifest))))
-
 
 ;;;
 ;;; Command-line options.
-- 
cgit v1.2.3