diff options
| author | Alex Kost <alezost@gmail.com> | 2015-11-21 11:35:43 +0300 |
|---|---|---|
| committer | Alex Kost <alezost@gmail.com> | 2016-01-02 17:25:35 +0300 |
| commit | 574f6727b061e2b58b23cb9b75a75d03822f5d08 (patch) | |
| tree | 6ebfe66edc69f4bf557dd3149776a6f1d3b144dd /emacs/guix-info.el | |
| parent | 9193fb7c1dedcf2233287baa819a9c9ded8242a8 (diff) | |
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.
Diffstat (limited to 'emacs/guix-info.el')
| -rw-r--r-- | emacs/guix-info.el | 9 |
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)) |