me/guix
Archived
1
0
Fork 0
Code Activity

emacs: Use space to separate package name and version in heading.

Browse source 
Reported by Ludovic Courtès <ludo@gnu.org>.

* emacs/guix-ui-package.el (guix-package-name): Check 'spec' property.
(guix-package-info-insert-heading): Use "name version" for button label,
write name specification to 'spec' property.
This commit is contained in:
Alex Kost 2016-03-21 10:58:29 +03:00
parent 4c68c53804
commit c292a6f304
1 changed files with 7 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
emacs/guix-ui-package.el
View file

@ -357,7 +357,8 @@ formatted with this string, an action button is inserted.")
(guix-buffer-get-display-entries-current
'info guix-package-info-type
(list (guix-ui-current-profile)
'name (button-label btn))
'name (or (button-get btn 'spec)
(button-label btn)))
'add)))
(define-button-type 'guix-package-heading
@ -374,10 +375,12 @@ formatted with this string, an action button is inserted.")
(message "Yes, this is the source URL. What did you expect?")))
(defun guix-package-info-insert-heading (entry)
"Insert package ENTRY heading (name specification) at point."
"Insert package ENTRY heading (name and version) at point."
(guix-insert-button
(guix-package-entry->name-specification entry)
'guix-package-heading))
(concat (guix-entry-value entry 'name) " "
(guix-entry-value entry 'version))
'guix-package-heading
'spec (guix-package-entry->name-specification entry)))
(defun guix-package-info-insert-systems (systems entry)
"Insert supported package SYSTEMS at point."