diff options
author | Eric Bavier <bavier@member.fsf.org> | 2014-07-25 07:38:20 -0500 |
---|---|---|
committer | Eric Bavier <bavier@member.fsf.org> | 2014-07-25 07:41:57 -0500 |
commit | 5e6feee61793a6b60aa352dcdbbed0155eb42e7f (patch) | |
tree | 23a5affe24bc04d663555484775bf5361f505233 /guix | |
parent | 7eade0ee035578d172e8812d1f06e25744308ac0 (diff) | |
download | gnu-guix-5e6feee61793a6b60aa352dcdbbed0155eb42e7f.tar gnu-guix-5e6feee61793a6b60aa352dcdbbed0155eb42e7f.tar.gz |
guix: package: Fix recutils output for non-package inputs.
* guix/ui.scm (package->recutils)[dependencies]: Ignore non-package inputs.
* tests/guix-package.sh: New test.
Diffstat (limited to 'guix')
-rw-r--r-- | guix/ui.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/guix/ui.scm b/guix/ui.scm index 1b7d334757..9112d55daf 100644 --- a/guix/ui.scm +++ b/guix/ui.scm @@ -468,8 +468,8 @@ WIDTH columns." (format port "version: ~a~%" (package-version p)) (format port "dependencies: ~a~%" (match (package-direct-inputs p) - (((labels packages . _) ...) - (dependencies->recutils packages)))) + (((labels inputs . _) ...) + (dependencies->recutils (filter package? inputs))))) (format port "location: ~a~%" (or (and=> (package-location p) location->string) (_ "unknown"))) |