Function: orgtbl-to-texinfo

orgtbl-to-texinfo is an autoloaded and byte-compiled function defined in org-table.el.gz.

Signature

(orgtbl-to-texinfo TABLE PARAMS)

Documentation

Convert the orgtbl-mode(var)/orgtbl-mode(fun) TABLE to Texinfo.

TABLE is a list, each entry either the symbol hline for a horizontal separator line, or a list of fields for that line. PARAMS is a property list of parameters that can influence the conversion. All parameters from orgtbl-to-generic are supported. It is also possible to use the following one:

:columns

  Column widths, as a string. When providing column fractions,
  "@columnfractions" command can be omitted.

Source Code

;; Defined in /usr/src/emacs/lisp/org/org-table.el.gz
;;;###autoload
(defun orgtbl-to-texinfo (table params)
  "Convert the `orgtbl-mode' TABLE to Texinfo.

TABLE is a list, each entry either the symbol `hline' for
a horizontal separator line, or a list of fields for that line.
PARAMS is a property list of parameters that can influence the
conversion.  All parameters from `orgtbl-to-generic' are
supported.  It is also possible to use the following one:

:columns

  Column widths, as a string.  When providing column fractions,
  \"@columnfractions\" command can be omitted."
  (require 'ox-texinfo)
  (let ((output
	 (orgtbl-to-generic
	  table
	  (org-combine-plists
	   (list :backend 'texinfo
		 :texinfo-tables-verbatim nil
		 :texinfo-table-scientific-notation nil)
	   params)))
	(columns (let ((w (plist-get params :columns)))
		   (cond ((not w) nil)
			 ((string-match-p "{\\|@columnfractions " w) w)
			 (t (concat "@columnfractions " w))))))
    (if (not columns) output
      (replace-regexp-in-string
       "@multitable \\(.*\\)" columns output t nil 1))))