Function: tree-widget-icon-action

tree-widget-icon-action is a byte-compiled function defined in tree-widget.el.gz.

Signature

(tree-widget-icon-action ICON &optional EVENT)

Documentation

Handle the ICON widget :action.

If ICON :node is a leaf node it handles the :action. The tree-widget parent of ICON handles the :action otherwise. Pass the received EVENT to :action.

Source Code

;; Defined in /usr/src/emacs/lisp/tree-widget.el.gz
(defun tree-widget-icon-action (icon &optional event)
  "Handle the ICON widget :action.
If ICON :node is a leaf node it handles the :action.  The tree-widget
parent of ICON handles the :action otherwise.
Pass the received EVENT to :action."
  (let ((node (widget-get icon (if (tree-widget-leaf-node-icon-p icon)
                                   :node :parent))))
    (widget-apply node :action event)))