Function: window-tool-bar--style

window-tool-bar--style is a byte-compiled function defined in window-tool-bar.el.gz.

Signature

(window-tool-bar--style)

Documentation

Return the effective style based on window-tool-bar-style.

This also takes into account frame capabilities. If the current frame cannot display images (see display-images-p), then this will always return the symbol text.

Source Code

;; Defined in /usr/src/emacs/lisp/window-tool-bar.el.gz
(defun window-tool-bar--style ()
  "Return the effective style based on `window-tool-bar-style'.

This also takes into account frame capabilities.  If the current
frame cannot display images (see `display-images-p'), then this
will always return the symbol text."
  (if (not (display-images-p))
      'text
    (let ((style window-tool-bar-style))
      (when (eq style 'tool-bar-style)
        (setf style tool-bar-style))
      (unless (memq style '(image text both both-horiz text-image-horiz))
        (setf style (if (fboundp 'tool-bar-get-system-style)
                        (tool-bar-get-system-style)
                      'image)))
      style)))