emacs: Split 'guix-param-titles' variable.

Generate 'guix-ENTRY-TYPE-BUFFER-TYPE-titles' variables for each
ENTRY-TYPE and BUFFER-TYPE instead.

* emacs/guix-base.el (guix-param-titles): Remove.
  (guix-buffer-data): New variable.
  (guix-buffer-value, guix-buffer-param-title): New procedures.
  (guix-buffer-define-interface): Add ':titles' keyword.
* emacs/guix-info.el (guix-info-param-title): Adjust accordingly.
* emacs/guix-list.el (guix-list-param-title): Likewise.
  (guix-list-column-titles): Remove.
* doc/emacs.texi (Emacs Appearance): Adjust accordingly.

1 files changed, 7 insertions, 2 deletions

diff --git a/emacs/guix-info.el b/emacs/guix-info.el
index bf43b40e9e..3cad6624f3 100644
--- a/emacs/guix-info.el
+++ b/emacs/guix-info.el
@@ -127,7 +127,7 @@ This alist is filled by `guix-info-define-interface' macro.")
 
 (defun guix-info-param-title (entry-type param)
   "Return a title of an ENTRY-TYPE parameter PARAM."
-  (guix-get-param-title entry-type param))
+  (guix-buffer-param-title 'info entry-type param))
 
 (defun guix-info-format (entry-type)
   "Return 'info' format for ENTRY-TYPE."
@@ -486,11 +486,13 @@ After calling each METHOD, a new line is inserted."
             (native-inputs format (format guix-package-native-input))
             (propagated-inputs format
                                (format guix-package-propagated-input)))
+  :titles '((home-url . "Home page"))
   :required '(id name version installed non-unique))
 
 (guix-info-define-interface installed-output
   :format '((path simple (indent guix-file))
             (dependencies simple (indent guix-file)))
+  :titles '((path . "Store directory"))
   :reduced? t)
 
 (defface guix-package-info-heading
@@ -794,6 +796,7 @@ This function is used to hide a \"Download\" button if needed."
             (propagated-inputs format
                                (format guix-package-propagated-input))
             (description simple (indent guix-package-info-description)))
+  :titles guix-package-info-titles
   :required '(id package-id installed non-unique))
 
 (defun guix-output-info-insert-version (version entry)
@@ -827,7 +830,9 @@ This function is used to hide a \"Download\" button if needed."
             (prev-number format (format))
             (current format guix-generation-info-insert-current)
             (path simple (indent guix-file))
-            (time format (time))))
+            (time format (time)))
+  :titles '((path . "File name")
+            (prev-number . "Previous number")))
 
 (defface guix-generation-info-number
   '((t :inherit font-lock-keyword-face))