diff options
Diffstat (limited to 'emacs/tests')
| -rw-r--r-- | emacs/tests/tests-adjust-section.el | 18 | ||||
| -rw-r--r-- | emacs/tests/tests-basic.el | 2 |
2 files changed, 16 insertions, 4 deletions
diff --git a/emacs/tests/tests-adjust-section.el b/emacs/tests/tests-adjust-section.el index 667f5b31c..d544fda98 100644 --- a/emacs/tests/tests-adjust-section.el +++ b/emacs/tests/tests-adjust-section.el @@ -10,7 +10,7 @@ ;; ;; Define tests. -(setq rest-adjust-section-tests +(setq rest-adjust-decoration-tests '( ;;------------------------------------------------------------------------------ (nodec-first-simple-1 @@ -415,6 +415,18 @@ Previous Title " ) +;;------------------------------------------------------------------------------ +(incomplete-top-2 +"======= +Document Title@ +============== +" +"============== +Document Title +============== + +" +) ;;------------------------------------------------------------------------------ (complete-simple @@ -761,8 +773,8 @@ Document Title2 (progn (regression-test-compare-expect-buffer "Test interactive adjustment of sections." - rest-adjust-section-tests + rest-adjust-decoration-tests (lambda () - (call-interactively 'rest-adjust-section-title)) + (call-interactively 'rest-adjust)) nil)) diff --git a/emacs/tests/tests-basic.el b/emacs/tests/tests-basic.el index 6b1458aac..73054742f 100644 --- a/emacs/tests/tests-basic.el +++ b/emacs/tests/tests-basic.el @@ -545,7 +545,7 @@ Next (regression-test-compare-expect-values "Test finding the hierarchy of sections in a file, ignoring lines." rest-get-hierarchy-ignore-tests - (lambda () (rest-get-hierarchy nil (rest-current-line))) nil)) + (lambda () (rest-get-hierarchy nil (line-number-at-pos))) nil)) |