diff options
author | Arun Isaac <arunisaac@systemreboot.net> | 2020-03-27 21:56:54 +0530 |
---|---|---|
committer | Guix Patches Tester <> | 2020-03-27 16:29:06 +0000 |
commit | 067329d6d3377d9a2808c436b6dd7888350dc3ae (patch) | |
tree | 70b846f7fde576a130ef77f57f0580ff9260643a /guix/scripts/package.scm | |
parent | bf4676539f333b2996bd11d82942471ec95a5f97 (diff) | |
download | patches-067329d6d3377d9a2808c436b6dd7888350dc3ae.tar patches-067329d6d3377d9a2808c436b6dd7888350dc3ae.tar.gz |
guix: Use package metadata cache for package search.series-3308
* guix/scripts/package.scm (process-query): Call search-packages and
display-package-search-results instead of find-packages-by-description and
display-search-results respectively.
* guix/ui.scm (package-metadata->recutils): New function.
(%package-metrics): Use package-metadata record field accessors.
(package-relevance): Rename argument package to package-metadata.
(display-package-search-results): New function.
Diffstat (limited to 'guix/scripts/package.scm')
-rw-r--r-- | guix/scripts/package.scm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/guix/scripts/package.scm b/guix/scripts/package.scm index 110d4f2977..c11f92f5a2 100644 --- a/guix/scripts/package.scm +++ b/guix/scripts/package.scm @@ -7,6 +7,7 @@ ;;; Copyright © 2016 Benz Schenk <benz.schenk@uzh.ch> ;;; Copyright © 2016 Chris Marusich <cmmarusich@gmail.com> ;;; Copyright © 2019 Tobias Geerinckx-Rice <me@tobias.gr> +;;; Copyright © 2020 Arun Isaac <arunisaac@systemreboot.net> ;;; ;;; This file is part of GNU Guix. ;;; @@ -770,9 +771,9 @@ processed, #f otherwise." (_ #f)) opts)) (regexps (map (cut make-regexp* <> regexp/icase) patterns)) - (matches (find-packages-by-description regexps))) + (matches (search-packages (current-profile) regexps))) (leave-on-EPIPE - (display-search-results matches (current-output-port))) + (display-package-search-results matches (current-output-port))) #t)) (('show requested-name) |