diff options
| author | Stefan Kangas <stefan@marxist.se> | 2021-04-25 12:59:14 +0200 |
|---|---|---|
| committer | Stefan Kangas <stefan@marxist.se> | 2021-04-25 13:00:29 +0200 |
| commit | 34367cc8afb05cf32d5ed9659de92989b89898c8 (patch) | |
| tree | 2cb5f4948e1db3b034865e73ab86f786140ab8eb /lisp/emacs-lisp/package.el | |
| parent | 33ba69cd7698f9f25139a57c25172f3354f6579a (diff) | |
| download | emacs-34367cc8afb05cf32d5ed9659de92989b89898c8.tar.gz emacs-34367cc8afb05cf32d5ed9659de92989b89898c8.tar.bz2 emacs-34367cc8afb05cf32d5ed9659de92989b89898c8.zip | |
Don't hard-code face of "Install" button
* lisp/emacs-lisp/package.el (package-make-button): Use the
'custom-button' face for the "Install" button. (Bug#47944)
Diffstat (limited to 'lisp/emacs-lisp/package.el')
| -rw-r--r-- | lisp/emacs-lisp/package.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el index 64d7d56019d..f2e83d3fda7 100644 --- a/lisp/emacs-lisp/package.el +++ b/lisp/emacs-lisp/package.el @@ -2696,9 +2696,9 @@ PROPERTIES are passed to `insert-text-button', for which this function is a convenience wrapper used by `describe-package-1'." (let ((button-text (if (display-graphic-p) text (concat "[" text "]"))) (button-face (if (display-graphic-p) - '(:box (:line-width 2 :color "dark grey") - :background "light grey" - :foreground "black") + (progn + (require 'cus-edit) ; for the custom-button face + 'custom-button) 'link))) (apply #'insert-text-button button-text 'face button-face 'follow-link t properties))) |