Function: package-make-button

package-make-button is a byte-compiled function defined in package.el.gz.

Signature

(package-make-button TEXT &rest PROPERTIES)

Documentation

Insert button labeled TEXT with button PROPERTIES at point.

PROPERTIES are passed to insert-text-button, for which this function is a convenience wrapper used by describe-package-1.

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/package.el.gz
(defun package-make-button (text &rest properties)
  "Insert button labeled TEXT with button PROPERTIES at point.
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)
                         (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)))