diff options
author | Ludovic Courtès <ludo@gnu.org> | 2014-07-25 23:19:23 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2014-07-25 23:42:42 +0200 |
commit | ff838e2ce64dccd79ad275d4fc314f7f0feb9947 (patch) | |
tree | 1ed7d5ea7d68b8cd41a3b89f4c78ec526797fa9c /guix | |
parent | 6621cdb65c09e8e7b428ccbc8d02e084420dde52 (diff) | |
download | gnu-guix-ff838e2ce64dccd79ad275d4fc314f7f0feb9947.tar gnu-guix-ff838e2ce64dccd79ad275d4fc314f7f0feb9947.tar.gz |
profiles: Remove dead code.
* guix/profiles.scm (write-manifest): Remove.
(read-manifest): Keep private.
Diffstat (limited to 'guix')
-rw-r--r-- | guix/profiles.scm | 7 |
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 |