diff options
Diffstat (limited to 'emacs/guix-info.el')
| -rw-r--r-- | emacs/guix-info.el | 11 |
1 files changed, 8 insertions, 3 deletions
diff --git a/emacs/guix-info.el b/emacs/guix-info.el index 260c7680f5..1c7e79b954 100644 --- a/emacs/guix-info.el +++ b/emacs/guix-info.el @@ -38,6 +38,12 @@ :group 'guix-info :group 'guix-faces) +(defface guix-info-heading + '((((type tty pc) (class color)) :weight bold) + (t :height 1.6 :weight bold :inherit variable-pitch)) + "Face for headings." + :group 'guix-info-faces) + (defface guix-info-param-title '((t :inherit font-lock-type-face)) "Face used for titles of parameters." @@ -374,7 +380,7 @@ If POS is nil, use the current point position." (interactive) (let ((button (button-at (or pos (point))))) (when button - (kill-new (button-label button))))) + (guix-copy-as-kill (button-label button))))) (defun guix-info-insert-action-button (label action &optional message &rest properties) @@ -416,8 +422,7 @@ See `insert-text-button' for the meaning of PROPERTIES." :required (id installed non-unique)) (defface guix-package-info-heading - '((((type tty pc) (class color)) :weight bold) - (t :height 1.6 :weight bold :inherit variable-pitch)) + '((t :inherit guix-info-heading)) "Face for package name and version headings." :group 'guix-package-info-faces) |