org-archive: Fix failing tests

* testing/lisp/test-org-archive.el (test-org-element/archive-update-status-cookie):
Fix failing tests.
This commit is contained in:
Nicolas Goaziou 2017-09-07 15:24:36 +02:00
parent 6cfc7cb958
commit 11979e298d
1 changed files with 4 additions and 2 deletions

View File

@ -27,7 +27,8 @@
(equal
"Top [0%]"
(org-test-with-temp-text-in-file
"* Top [%]\n<point>** DONE One\n** TODO Two"
"* Top [%]\n** DONE One\n** TODO Two"
(forward-line)
(org-archive-subtree)
(forward-line -1)
(org-element-property :title (org-element-at-point)))))
@ -35,7 +36,8 @@
(should
(equal
"Top [100%]"
(org-test-with-temp-text-in-file "* Top [%]\n<point>** TODO Two"
(org-test-with-temp-text-in-file "* Top [%]\n** TODO Two"
(forward-line)
(org-archive-subtree)
(forward-line -1)
(org-element-property :title (org-element-at-point)))))