summary refs log tree commit diff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2014-07-25 23:19:23 +0200
committerLudovic Courtès <ludo@gnu.org>2014-07-25 23:42:42 +0200
commitff838e2ce64dccd79ad275d4fc314f7f0feb9947 (patch)
tree1ed7d5ea7d68b8cd41a3b89f4c78ec526797fa9c
parent6621cdb65c09e8e7b428ccbc8d02e084420dde52 (diff)
downloadguix-ff838e2ce64dccd79ad275d4fc314f7f0feb9947.tar.gz
profiles: Remove dead code.
* guix/profiles.scm (write-manifest): Remove.
  (read-manifest): Keep private.
-rw-r--r--guix/profiles.scm7
1 files changed, 0 insertions, 7 deletions
diff --git a/guix/profiles.scm b/guix/profiles.scm
index c1fa8272ba..8dd04b81c0 100644
--- a/guix/profiles.scm
+++ b/guix/profiles.scm
@@ -45,9 +45,6 @@
             manifest-pattern
             manifest-pattern?
 
-            read-manifest
-            write-manifest
-
             manifest-remove
             manifest-installed?
             manifest-matching-entries
@@ -157,10 +154,6 @@
   "Return the packages listed in MANIFEST."
   (sexp->manifest (read port)))
 
-(define (write-manifest manifest port)
-  "Write MANIFEST to PORT."
-  (write (manifest->sexp manifest) port))
-
 (define (entry-predicate pattern)
   "Return a procedure that returns #t when passed a manifest entry that
 matches NAME/OUTPUT/VERSION.  OUTPUT and VERSION may be #f, in which case they