diff options
| author | Alex Kost <alezost@gmail.com> | 2015-12-09 23:19:17 +0300 |
|---|---|---|
| committer | Alex Kost <alezost@gmail.com> | 2016-01-02 17:25:35 +0300 |
| commit | ddf6948b2204fbb453df9bc2ade48454d3d6ee12 (patch) | |
| tree | 4acae5b81042e9c45b050da255c9f2b095cc59dc /emacs/guix-ui-generation.el | |
| parent | e29d19248483d2ac527894ca20fa69f88fabdfd3 (diff) | |
| download | guix-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.el | 8 |
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) |