Function: org-at-TBLFM-p

org-at-TBLFM-p is a byte-compiled function defined in org-table.el.gz.

Signature

(org-at-TBLFM-p &optional POS)

Documentation

Non-nil when point (or POS) is in #+TBLFM line.

Source Code

;; Defined in /usr/src/emacs/lisp/org/org-table.el.gz
;;; Predicates

(defun org-at-TBLFM-p (&optional pos)
  "Non-nil when point (or POS) is in #+TBLFM line."
  (save-excursion
    (goto-char (or pos (point)))
    (forward-line 0)
    (and (let ((case-fold-search t)) (looking-at org-TBLFM-regexp))
	 (org-element-type-p (org-element-at-point) 'table))))