summaryrefslogtreecommitdiff
path: root/emacs/guix-ui-generation.el
diff options
context:
space:
mode:
authorAlex Kost <alezost@gmail.com>2015-12-09 23:19:17 +0300
committerAlex Kost <alezost@gmail.com>2016-01-02 17:25:35 +0300
commitddf6948b2204fbb453df9bc2ade48454d3d6ee12 (patch)
tree4acae5b81042e9c45b050da255c9f2b095cc59dc /emacs/guix-ui-generation.el
parente29d19248483d2ac527894ca20fa69f88fabdfd3 (diff)
downloadpatches-ddf6948b2204fbb453df9bc2ade48454d3d6ee12.tar
patches-ddf6948b2204fbb453df9bc2ade48454d3d6ee12.tar.gz
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.
Diffstat (limited to 'emacs/guix-ui-generation.el')
-rw-r--r--emacs/guix-ui-generation.el8
1 files changed, 4 insertions, 4 deletions
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)