summary refs log tree commit diff
path: root/emacs/guix-messages.el
diff options
context:
space:
mode:
Diffstat (limited to 'emacs/guix-messages.el')
-rw-r--r--emacs/guix-messages.el5
1 files changed, 4 insertions, 1 deletions
diff --git a/emacs/guix-messages.el b/emacs/guix-messages.el
index 9f6d833252..c4f15dcac2 100644
--- a/emacs/guix-messages.el
+++ b/emacs/guix-messages.el
@@ -186,7 +186,10 @@ Try \"M-x guix-search-by-name\"."
                             search-type search-vals)
   "Display an appropriate message after displaying ENTRIES."
   (let* ((type-spec (guix-assq-value guix-messages
-                                     entry-type search-type))
+                                     (if (eq entry-type 'system-generation)
+                                         'generation
+                                       entry-type)
+                                     search-type))
          (fun-or-count-spec (car type-spec)))
     (if (functionp fun-or-count-spec)
         (funcall fun-or-count-spec profile entries search-vals)