Function: org-table-row-get-visible-string

org-table-row-get-visible-string is a byte-compiled function defined in org-table.el.gz.

Signature

(org-table-row-get-visible-string &optional POS)

Documentation

Get the visible string of a table row.

This may be useful when columns have been shrunk.

Source Code

;; Defined in /usr/src/emacs/lisp/org/org-table.el.gz
;;; Org table header minor mode
(defun org-table-row-get-visible-string (&optional pos)
  "Get the visible string of a table row.
This may be useful when columns have been shrunk."
  (save-excursion
    (when pos (goto-char pos))
    (goto-char (line-beginning-position))
    (let ((end (line-end-position)) str)
      (goto-char (1- pos))
      (while (progn (forward-char 1) (< (point) end))
	(let ((ov (car (overlays-at (point)))))
	  (if (not ov)
	      (push (char-to-string (char-after)) str)
	    (push (overlay-get ov 'display) str)
	    (goto-char (1- (overlay-end ov))))))
      (format "|%s" (mapconcat #'identity (reverse str) "")))))