mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-09-29 21:07:54 +00:00
Add test for table alignment
* testing/lisp/test-org-table.el (test-org-table/align-buffer-tables): New test to document current behavior.
This commit is contained in:
parent
ed86b1aa3c
commit
e66298dfd9
|
@ -167,6 +167,28 @@
|
|||
| ab | ab | ab | ab | ab | ab |
|
||||
"))
|
||||
|
||||
(ert-deftest test-org-table/align-buffer-tables ()
|
||||
"Align all tables when updating buffer."
|
||||
(let ((before "
|
||||
| a b |
|
||||
|
||||
| c d |
|
||||
")
|
||||
;; FIXME: Tables should be aligned.
|
||||
(after "
|
||||
| a b |
|
||||
|
||||
| c d |
|
||||
"))
|
||||
(should (equal (org-test-with-temp-text before
|
||||
(org-table-recalculate-buffer-tables)
|
||||
(buffer-string))
|
||||
after))
|
||||
(should (equal (org-test-with-temp-text before
|
||||
(org-table-iterate-buffer-tables)
|
||||
(buffer-string))
|
||||
after))))
|
||||
|
||||
(defconst references/target-normal "
|
||||
| 0 | 1 | replace | replace | replace | replace | replace | replace |
|
||||
| z | 1 | replace | replace | replace | replace | replace | replace |
|
||||
|
|
Loading…
Reference in a new issue