From ddf6948b2204fbb453df9bc2ade48454d3d6ee12 Mon Sep 17 00:00:00 2001 From: Alex Kost Date: Wed, 9 Dec 2015 23:19:17 +0300 Subject: emacs: Add 'guix-list-get-display-entries'. * emacs/guix-list.el (guix-list-get-display-entries): New procedure. * emacs/guix-ui-generation.el (guix-generation-get-display): Use it. --- emacs/guix-ui-generation.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'emacs/guix-ui-generation.el') diff --git a/emacs/guix-ui-generation.el b/emacs/guix-ui-generation.el index 7d6762a444..ec6d2187cd 100644 --- a/emacs/guix-ui-generation.el +++ b/emacs/guix-ui-generation.el @@ -47,10 +47,10 @@ If PROFILE is nil, use `guix-current-profile'. See `guix-ui-get-entries' for the meaning of SEARCH-TYPE and SEARCH-VALUES." - (let ((args (cl-list* (or profile guix-current-profile) - search-type search-values))) - (guix-buffer-get-display-entries - 'list 'generation args 'add))) + (apply #'guix-list-get-display-entries + 'generation + (or profile guix-current-profile) + search-type search-values)) (defun guix-delete-generations (profile generations &optional operation-buffer) -- cgit v1.2.3