forked from mirrors/org-mode
Merge branch 'maint'
This commit is contained in:
commit
eaa458594f
|
@ -4452,6 +4452,8 @@ same column as TABLE-CELL. If no such cookie is found, a default
|
||||||
alignment value will be deduced from fraction of numbers in the
|
alignment value will be deduced from fraction of numbers in the
|
||||||
column (see `org-table-number-fraction' for more information).
|
column (see `org-table-number-fraction' for more information).
|
||||||
Possible values are `left', `right' and `center'."
|
Possible values are `left', `right' and `center'."
|
||||||
|
;; Load `org-table-number-fraction' and `org-table-number-regexp'.
|
||||||
|
(require 'org-table)
|
||||||
(let* ((row (org-export-get-parent table-cell))
|
(let* ((row (org-export-get-parent table-cell))
|
||||||
(table (org-export-get-parent row))
|
(table (org-export-get-parent row))
|
||||||
(cells (org-element-contents row))
|
(cells (org-element-contents row))
|
||||||
|
@ -4460,7 +4462,7 @@ Possible values are `left', `right' and `center'."
|
||||||
(cache (or (plist-get info :table-cell-alignment-cache)
|
(cache (or (plist-get info :table-cell-alignment-cache)
|
||||||
(plist-get (setq info
|
(plist-get (setq info
|
||||||
(plist-put info :table-cell-alignment-cache
|
(plist-put info :table-cell-alignment-cache
|
||||||
(make-hash-table :test 'equal)))
|
(make-hash-table :test 'eq)))
|
||||||
:table-cell-alignment-cache)))
|
:table-cell-alignment-cache)))
|
||||||
(align-vector (or (gethash table cache)
|
(align-vector (or (gethash table cache)
|
||||||
(puthash table (make-vector columns nil) cache))))
|
(puthash table (make-vector columns nil) cache))))
|
||||||
|
|
Loading…
Reference in New Issue