Function: org-table--generic-apply

org-table--generic-apply is a byte-compiled function defined in org-table.el.gz.

Signature

(org-table--generic-apply VALUE NAME &optional WITH-CONS &rest ARGS)

Source Code

;; Defined in /usr/src/emacs/lisp/org/org-table.el.gz
(defun org-table--generic-apply (value name &optional with-cons &rest args)
  (cond ((null value) nil)
        ((functionp value) `(funcall ',value ,@args))
        ((stringp value)
	 (cond ((consp (car args)) `(apply #'format ,value ,@args))
	       (args `(format ,value ,@args))
	       (t value)))
	((and with-cons (consp value))
	 `(let ((val (cadr (memq column ',value))))
	    (cond ((null val) contents)
		  ((stringp val) (format val ,@args))
		  ((functionp val) (funcall val ,@args))
		  (t (user-error "Wrong %s value" ,name)))))
        (t (user-error "Wrong %s value" name))))