summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2018-06-01 17:31:44 +0200
committerLudovic Courtès <ludo@gnu.org>2018-06-01 18:41:45 +0200
commit6d52844cd4c376b7b344b448de8a2c7a3d252afb (patch)
tree39b586b0559331cedc0a3e46ca15d716ff272664
parent65a9f6b6cf3e41a4bbb144d03c5c440dd01d25dc (diff)
self: Add dependency on guile-gdbm-ffi.
Fixes a regression introduced in 331ac4cc239727992329207ba428b3f26cae91d9 whereby "guile-gdbm-ffi" would now be mandatory. * guix/self.scm (specification->package): Add "guile-gdbm-ffi" and "guile2.0-gdbm-ffi". (compiled-guix)[guile-gdbm-ffi]: New variables. [dependencies]: Add it.
-rw-r--r--guix/self.scm10
1 files changed, 9 insertions, 1 deletions
diff --git a/guix/self.scm b/guix/self.scm
index 64cf3033b7..9ff949075d 100644
--- a/guix/self.scm
+++ b/guix/self.scm
@@ -82,6 +82,7 @@ GUILE-VERSION (\"2.0\" or \"2.2\"), or #f if none of the packages matches."
("guile-json" (ref '(gnu packages guile) 'guile-json))
("guile-ssh" (ref '(gnu packages ssh) 'guile-ssh))
("guile-git" (ref '(gnu packages guile) 'guile-git))
+ ("guile-gdbm-ffi" (ref '(gnu packages guile) 'guile-gdbm-ffi))
("guile-sqlite3" (ref '(gnu packages guile) 'guile-sqlite3))
("libgcrypt" (ref '(gnu packages gnupg) 'libgcrypt))
("zlib" (ref '(gnu packages compression) 'zlib))
@@ -93,6 +94,7 @@ GUILE-VERSION (\"2.0\" or \"2.2\"), or #f if none of the packages matches."
("guile2.0-json" (ref '(gnu packages guile) 'guile2.0-json))
("guile2.0-ssh" (ref '(gnu packages ssh) 'guile2.0-ssh))
("guile2.0-git" (ref '(gnu packages guile) 'guile2.0-git))
+ ("guile2.0-gdbm-ffi" (ref '(gnu packages guile) 'guile2.0-gdbm-ffi))
;; XXX: No "guile2.0-sqlite3".
(_ #f)))) ;no such package
@@ -217,6 +219,11 @@ list of file-name/file-like objects suitable as inputs to 'imported-files'."
"guile-git"
"guile2.0-git"))
+ (define guile-gdbm-ffi
+ (package-for-guile guile-version
+ "guile-gdbm-ffi"
+ "guile2.0-gdbm-ffi"))
+
(define guile-sqlite3
(package-for-guile guile-version
@@ -227,7 +234,8 @@ list of file-name/file-like objects suitable as inputs to 'imported-files'."
(match (append-map (lambda (package)
(cons (list "x" package)
(package-transitive-propagated-inputs package)))
- (list guile-git guile-json guile-ssh guile-sqlite3))
+ (list guile-git guile-json guile-ssh
+ guile-gdbm-ffi guile-sqlite3))
(((labels packages _ ...) ...)
packages)))