Function: orgtbl-gather-send-defs

orgtbl-gather-send-defs is a byte-compiled function defined in org-table.el.gz.

Signature

(orgtbl-gather-send-defs)

Documentation

Gather a plist of :name, :transform, :params for each destination before a radio table.

Source Code

;; Defined in /usr/src/emacs/lisp/org/org-table.el.gz
(defun orgtbl-gather-send-defs ()
  "Gather a plist of :name, :transform, :params for each destination before
a radio table."
  (save-excursion
    (goto-char (org-table-begin))
    (let (rtn)
      (forward-line -1)
      (catch :bob
        (while (looking-at "[ \t]*#\\+ORGTBL[: \t][ \t]*SEND[ \t]+\\([^ \t\r\n]+\\)[ \t]+\\([^ \t\r\n]+\\)\\([ \t]+.*\\)?")
	  (let ((name (org-no-properties (match-string 1)))
                (transform (intern (match-string 2)))
                (params (if (match-end 3)
			    (read (concat "(" (match-string 3) ")")))))
	    (push (list :name name :transform transform :params params)
		  rtn)
            (when (bobp) (throw :bob nil))
	    (forward-line -1))))
      rtn)))