diff --git a/guix/ui.scm b/guix/ui.scm index 74ea20e6c8..1b7d334757 100644 --- a/guix/ui.scm +++ b/guix/ui.scm @@ -453,6 +453,13 @@ WIDTH columns." (fill-paragraph str width (string-length "description: "))))) + (define (dependencies->recutils packages) + (let ((list (string-join (map package-full-name + (sort packages packagerecutils + (fill-paragraph list width + (string-length "dependencies: "))))) + (define (packagerecutils packages)))) (format port "location: ~a~%" (or (and=> (package-location p) location->string) (_ "unknown")))