forked from mirrors/org-mode
Merge branch 'maint'
This commit is contained in:
commit
a2c13a31bb
|
@ -269,6 +269,7 @@ be placed after the end of the title."
|
|||
|
||||
(defcustom org-texinfo-table-scientific-notation "%s\\,(%s)"
|
||||
"Format string to display numbers in scientific notation.
|
||||
|
||||
The format should have \"%s\" twice, for mantissa and exponent
|
||||
\(i.e. \"%s\\\\times10^{%s}\").
|
||||
|
||||
|
@ -279,7 +280,12 @@ When nil, no transformation is made."
|
|||
(const :tag "No formatting" nil)))
|
||||
|
||||
(defcustom org-texinfo-def-table-markup "@samp"
|
||||
"Default setting for @table environments."
|
||||
"Default markup for first column in two-column tables.
|
||||
|
||||
This should an indicating command, e.g., \"@code\", \"@kbd\" or
|
||||
\"@asis\".
|
||||
|
||||
It can be overridden locally using the \":indic\" attribute."
|
||||
:group 'org-export-texinfo
|
||||
:type 'string)
|
||||
|
||||
|
@ -1208,8 +1214,10 @@ the plist used as a communication channel."
|
|||
CONTENTS is the contents of the list. INFO is a plist holding
|
||||
contextual information."
|
||||
(let* ((attr (org-export-read-attribute :attr_texinfo plain-list))
|
||||
(indic (or (plist-get attr :indic)
|
||||
(plist-get info :texinfo-def-table-markup)))
|
||||
(indic (let ((i (or (plist-get attr :indic)
|
||||
(plist-get info :texinfo-def-table-markup))))
|
||||
;; Allow indicating commands with missing @ sign.
|
||||
(if (string-prefix-p "@" i) i (concat "@" i))))
|
||||
(table-type (plist-get attr :table-type))
|
||||
(type (org-element-property :type plain-list))
|
||||
(list-type (cond
|
||||
|
|
Loading…
Reference in New Issue