civodul pushed a commit to branch master
in repository guix.
commit ee71d44e60a128e107436e1e0405b45280cb49c6
Author: Ludovic Courtès <[email protected]>
Date: Fri Mar 15 17:43:45 2019 +0100
build-system/glib-or-gtk: Support #:disallowed-references.
* guix/build-system/glib-or-gtk.scm (glib-or-gtk-build): Add
#:disallowed-references and honor it.
---
guix/build-system/glib-or-gtk.scm | 9 +++++++--
1 file changed, 7 insertions(+), 2 deletions(-)
diff --git a/guix/build-system/glib-or-gtk.scm
b/guix/build-system/glib-or-gtk.scm
index fcd92f2..8de7dfb 100644
--- a/guix/build-system/glib-or-gtk.scm
+++ b/guix/build-system/glib-or-gtk.scm
@@ -1,5 +1,5 @@
;;; GNU Guix --- Functional package management for GNU
-;;; Copyright © 2013, 2014, 2015 Ludovic Courtès <[email protected]>
+;;; Copyright © 2013, 2014, 2015, 2019 Ludovic Courtès <[email protected]>
;;; Copyright © 2013 Cyril Roelandt <[email protected]>
;;; Copyright © 2014 Federico Beffa <[email protected]>
;;;
@@ -129,7 +129,8 @@
(system (%current-system))
(imported-modules
%glib-or-gtk-build-system-modules)
(modules %default-modules)
- allowed-references)
+ allowed-references
+ disallowed-references)
"Build SOURCE with INPUTS. See GNU-BUILD for more details."
(define canonicalize-reference
(match-lambda
@@ -190,6 +191,10 @@
(and allowed-references
(map canonicalize-reference
allowed-references))
+ #:disallowed-references
+ (and disallowed-references
+ (map canonicalize-reference
+ disallowed-references))
#:guile-for-build guile-for-build))
(define glib-or-gtk-build-system
