From 9155411f2e8e78922e1e46d92068ac8f652ff0a5 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Sun, 15 Nov 2020 17:01:14 +0100 Subject: [PATCH 3/4] ui: 'package->recutils' emits "parameters" field. * guix/ui.scm (package->recutils): Add "parameters" recutils field. --- guix/ui.scm | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/guix/ui.scm b/guix/ui.scm index 4e686297e8..2485400cc9 100644 --- a/guix/ui.scm +++ b/guix/ui.scm @@ -60,6 +60,7 @@ #:hide (package-name->name+version ;; Avoid "overrides core binding" warning. delete)) + #:autoload (guix parameters) (package-parameters package-parameter-name) #:use-module (srfi srfi-1) #:use-module (srfi srfi-9 gnu) #:use-module (srfi srfi-11) @@ -1529,6 +1530,10 @@ HYPERLINKS? is true, emit hyperlink escape sequences when appropriate." (format port "name: ~a~%" (package-name p)) (format port "version: ~a~%" (package-version p)) (format port "outputs: ~a~%" (string-join (package-outputs p))) + (match (package-parameters p) + (() #t) + (lst (format port "parameters:~{ ~a~}~%" + (map package-parameter-name lst)))) (format port "systems: ~a~%" (string-join (package-transitive-supported-systems p))) (format port "dependencies: ~a~%" -- 2.29.2