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:
parent
690c055b08
commit
a7c61781df
|
@ -346,9 +346,13 @@ formatted with this string, an action button is inserted.")
|
||||||
(define-button-type 'guix-package-license
|
(define-button-type 'guix-package-license
|
||||||
:supertype 'guix
|
:supertype 'guix
|
||||||
'face 'guix-package-info-license
|
'face 'guix-package-info-license
|
||||||
'help-echo "Browse license URL"
|
'help-echo "Display license info"
|
||||||
'action (lambda (btn)
|
'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
|
(define-button-type 'guix-package-name
|
||||||
:supertype 'guix
|
:supertype 'guix
|
||||||
|
|
Loading…
Reference in New Issue