Function: org-element-table-row-parser
org-element-table-row-parser is a byte-compiled function defined in
org-element.el.gz.
Signature
(org-element-table-row-parser _)
Documentation
Parse table row at point.
Return a list whose CAR is table-row and CDR is a plist
containing :begin, :end, :contents-begin, :contents-end,
:type, :post-blank and :post-affiliated keywords.
Source Code
;; Defined in /usr/src/emacs/lisp/org/org-element.el.gz
;;;; Table Row
(defun org-element-table-row-parser (_)
"Parse table row at point.
Return a list whose CAR is `table-row' and CDR is a plist
containing `:begin', `:end', `:contents-begin', `:contents-end',
`:type', `:post-blank' and `:post-affiliated' keywords."
(save-excursion
(let* ((type (if (looking-at "^[ \t]*|-") 'rule 'standard))
(begin (point))
;; A table rule has no contents. In that case, ensure
;; CONTENTS-BEGIN matches CONTENTS-END.
(contents-begin (and (eq type 'standard) (search-forward "|")))
(contents-end (and (eq type 'standard)
(progn
(end-of-line)
(skip-chars-backward " \t")
(point))))
(end (line-beginning-position 2)))
(list 'table-row
(list :type type
:begin begin
:end end
:contents-begin contents-begin
:contents-end contents-end
:post-blank 0
:post-affiliated begin)))))