Function: actype:action

actype:action is a byte-compiled function defined in hact.el.

Signature

(actype:action ACTYPE)

Documentation

If ACTYPE is a bound function symbol, return it.

Otherwise, return its body. ACTYPE must be a bound function symbol, symbol name or function body. ACTYPE may be a Hyperbole actype or Emacs Lisp function.

Source Code

;; Defined in ~/.emacs.d/elpa/hyperbole-20260414.325/hact.el
(defun    actype:action (actype)
  "If ACTYPE is a bound function symbol, return it.
Otherwise, return its body.  ACTYPE must be a bound function
symbol, symbol name or function body.  ACTYPE may be a Hyperbole
actype or Emacs Lisp function."
  (let (actname
	action)
    (cond ((stringp actype)
	   (setq actname actype
		 actype (intern actype)))
	  ((and actype (symbolp actype))
	   (setq actname (symbol-name actype))))
    (setq actype (or (symtable:actype-p actname) actype)
	  action (htype:body actype))
    (if (functionp actype)
	actype
      action)))