aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2023-02-23 14:32:51 +0100
committerLudovic Courtès <ludo@gnu.org>2023-02-23 16:31:35 +0100
commit73c738bc9e5374a1dc38237dfc067fa2c320d5bd (patch)
tree37d0788d4b1cf32400d339eb23342fff5a43e1de
parent9b3cc02acb446a55e5c810ad087cf87bcfd69da7 (diff)
downloadguix-73c738bc9e5374a1dc38237dfc067fa2c320d5bd.tar
guix-73c738bc9e5374a1dc38237dfc067fa2c320d5bd.tar.gz
gnu: infiniband-diags: Use gexps.
* gnu/packages/fabric-management.scm (infiniband-diags)[arguments]: Use gexps. Replace reference to '%outputs' with references to #:outputs.
-rw-r--r--gnu/packages/fabric-management.scm46
1 files changed, 24 insertions, 22 deletions
diff --git a/gnu/packages/fabric-management.scm b/gnu/packages/fabric-management.scm
index 1ed65df0c1..09e4a2b854 100644
--- a/gnu/packages/fabric-management.scm
+++ b/gnu/packages/fabric-management.scm
@@ -109,28 +109,30 @@ running the opensm daemon.")
;; FIXME: needs rst2man for man pages
(list perl pkg-config))
(arguments
- '(#:configure-flags
- (list (string-append "CPPFLAGS=-I" (assoc-ref %build-inputs "opensm")
- "/include/infiniband")
- (string-append "--with-perl-installdir=" (assoc-ref %outputs "lib")
- "/lib/perl5/vendor_perl")
- "--disable-static")
- #:phases
- (modify-phases %standard-phases
- (add-after 'install 'licence
- (lambda _
- (let ((doc (string-append (assoc-ref %outputs "lib") "/share/doc")))
- (mkdir-p doc)
- (install-file "COPYING" doc))))
- (add-after 'install-file 'move-perl
- ;; Avoid perl in lib closure
- (lambda _
- (let ((perlout (string-append (assoc-ref %outputs "out") "/lib"))
- (perlin (string-append (assoc-ref %outputs "lib")
- "/lib/perl5")))
- (mkdir-p perlout)
- (rename-file perlin perlout)
- #t))))))
+ (list #:configure-flags
+ #~(list (string-append "CPPFLAGS=-I"
+ #$(this-package-input "opensm")
+ "/include/infiniband")
+ (string-append "--with-perl-installdir=" #$output:lib
+ "/lib/perl5/vendor_perl")
+ "--disable-static")
+ #:phases
+ #~(modify-phases %standard-phases
+ (add-after 'install 'licence
+ (lambda* (#:key outputs #:allow-other-keys)
+ (let ((doc (string-append (assoc-ref outputs "lib")
+ "/share/doc")))
+ (mkdir-p doc)
+ (install-file "COPYING" doc))))
+ (add-after 'install-file 'move-perl
+ ;; Avoid perl in lib closure
+ (lambda* (#:key outputs #:allow-other-keys)
+ (let ((perlout (string-append (assoc-ref outputs "out")
+ "/lib"))
+ (perlin (string-append (assoc-ref outputs "lib")
+ "/lib/perl5")))
+ (mkdir-p perlout)
+ (rename-file perlin perlout)))))))
(home-page "https://github.com/linux-rdma/infiniband-diags")
(synopsis "Infiniband diagnostic tools")
(description "This is a set of command-line utilities to help configure,