diff options
Diffstat (limited to 'emacs/guix.el')
| -rw-r--r-- | emacs/guix.el | 24 |
1 files changed, 9 insertions, 15 deletions
diff --git a/emacs/guix.el b/emacs/guix.el index f6e2023ea5..a1425161c4 100644 --- a/emacs/guix.el +++ b/emacs/guix.el @@ -57,25 +57,19 @@ SEARCH-VALS. Results are displayed in the list buffer, unless a single package is found and `guix-list-single-package' is nil." - (let* ((list-params (guix-get-params-for-receiving - 'list guix-package-list-type)) - (packages (guix-get-entries guix-package-list-type - search-type search-vals - list-params))) + (let ((packages (guix-get-entries guix-package-list-type + search-type search-vals + (guix-get-params-for-receiving + 'list guix-package-list-type)))) (if (or guix-list-single-package (cdr packages)) (guix-set-buffer packages 'list guix-package-list-type search-type search-vals) - (let* ((info-params (guix-get-params-for-receiving - 'info guix-package-list-type)) - (packages (if (equal list-params info-params) - packages - ;; If we don't have required info, we should - ;; receive it again - (guix-get-entries guix-package-list-type - search-type search-vals - info-params)))) - (guix-set-buffer packages 'info guix-package-list-type + (let ((packages (guix-get-entries guix-package-info-type + search-type search-vals + (guix-get-params-for-receiving + 'info guix-package-info-type)))) + (guix-set-buffer packages 'info guix-package-info-type search-type search-vals))))) (defun guix-get-show-generations (search-type &rest search-vals) |