emacs: Display license info on button press in Package Info buffer.

* emacs/guix-ui-package.el (guix-package-license): Adjust button action
  to display license info instead of browsing license URL.
This commit is contained in:
Alex Kost 2016-04-07 21:36:32 +03:00
parent 690c055b08
commit a7c61781df
1 changed files with 6 additions and 2 deletions

View File

@ -346,9 +346,13 @@ formatted with this string, an action button is inserted.")
(define-button-type 'guix-package-license
:supertype 'guix
'face 'guix-package-info-license
'help-echo "Browse license URL"
'help-echo "Display license info"
'action (lambda (btn)
(guix-browse-license-url (button-label btn))))
(require 'guix-ui-license)
(guix-buffer-get-display-entries
'info 'license
(list 'name (button-label btn))
'add)))
(define-button-type 'guix-package-name
:supertype 'guix