Fix some issue with orgtbl-mode
* lisp/org-table.el (orgtbl-send-replace-tbl): Allow multiple spaces between keywords in RECEIVE ORGTBL lines. * doc/org.texi (A @LaTeX{} example): Fix typo in variable name.
This commit is contained in:
parent
31c2c517f4
commit
daf36fc918
|
@ -16782,9 +16782,10 @@ can use Org's facilities to edit and structure lists by turning
|
|||
@cindex radio tables
|
||||
|
||||
To define the location of the target table, you first need to create two
|
||||
lines that are comments in the current mode, but contain magic words for
|
||||
Orgtbl mode to find. Orgtbl mode will insert the translated table
|
||||
between these lines, replacing whatever was there before. For example:
|
||||
lines that are comments in the current mode, but contain magic words
|
||||
@code{BEGIN/END RECEIVE ORGTBL} for Orgtbl mode to find. Orgtbl mode will
|
||||
insert the translated table between these lines, replacing whatever was there
|
||||
before. For example in C mode where comments are between @code{/* ... */}:
|
||||
|
||||
@example
|
||||
/* BEGIN RECEIVE ORGTBL table_name */
|
||||
|
@ -16858,7 +16859,7 @@ The best way to wrap the source table in @LaTeX{} is to use the
|
|||
activated by placing @code{\usepackage@{comment@}} into the document
|
||||
header. Orgtbl mode can insert a radio table skeleton@footnote{By
|
||||
default this works only for @LaTeX{}, HTML, and Texinfo. Configure the
|
||||
variable @code{orgtbl-radio-tables} to install templates for other
|
||||
variable @code{orgtbl-radio-table-templates} to install templates for other
|
||||
modes.} with the command @kbd{M-x orgtbl-insert-radio-table RET}. You will
|
||||
be prompted for a table name, let's say we use @samp{salesfigures}. You
|
||||
will then get the following template:
|
||||
|
|
|
@ -4399,14 +4399,14 @@ a radio table."
|
|||
(save-excursion
|
||||
(goto-char (point-min))
|
||||
(unless (re-search-forward
|
||||
(concat "BEGIN RECEIVE ORGTBL +" name "\\([ \t]\\|$\\)") nil t)
|
||||
(concat "BEGIN +RECEIVE +ORGTBL +" name "\\([ \t]\\|$\\)") nil t)
|
||||
(user-error "Don't know where to insert translated table"))
|
||||
(goto-char (match-beginning 0))
|
||||
(beginning-of-line 2)
|
||||
(save-excursion
|
||||
(let ((beg (point)))
|
||||
(unless (re-search-forward
|
||||
(concat "END RECEIVE ORGTBL +" name) nil t)
|
||||
(concat "END +RECEIVE +ORGTBL +" name) nil t)
|
||||
(user-error "Cannot find end of insertion region"))
|
||||
(beginning-of-line 1)
|
||||
(delete-region beg (point))))
|
||||
|
|
Loading…
Reference in New Issue