mirrors/org-mode
0
0
Fork 1
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-09-29 19:37:52 +00:00
Code Releases Activity

org-table: Do not trim output of radio tables

Browse source 
* lisp/org-table.el (orgtbl-to-generic): Leading and trailing spaces
  could be significant, so do not trim result.  However, remove the
  final newline character.

Reported-by: lom pik <lompikvoila@gmail.com> <>
<http://permalink.gmane.org/gmane.emacs.orgmode/99171>
This commit is contained in:
Nicolas Goaziou 2015-07-23 00:34:02 +02:00
parent 6e1d7bc8fe
commit bf37cd09b1
1 changed files with 4 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/org-table.el
View file

@ -4765,7 +4765,8 @@ This may be either a string or a function of two arguments:
(when (and backend (symbolp backend) (not (org-export-get-backend backend)))
(user-error "Unknown :backend value"))
(when (or (not backend) (plist-get params :raw)) (require 'ox-org))
(org-trim
;; Remove final newline.
(substring
(org-export-string-as
;; Return TABLE as Org syntax. Tolerate non-string cells.
(with-output-to-string
@ -4820,7 +4821,8 @@ This may be either a string or a function of two arguments:
(table-cell . ,(org-table--to-generic-cell params))
;; Section. Return contents to avoid garbage around table.
(section . (lambda (s c i) c))))
'body-only (org-combine-plists params '(:with-tables t))))))
'body-only (org-combine-plists params '(:with-tables t)))
0 -1)))
(defun org-table--generic-apply (value name &optional with-cons &rest args)
(cond ((null value) nil)