diff --git a/testing/lisp/test-org-macs.el b/testing/lisp/test-org-macs.el index 6a7ccea3c..05cef1281 100644 --- a/testing/lisp/test-org-macs.el +++ b/testing/lisp/test-org-macs.el @@ -65,7 +65,11 @@ (ert-deftest test-org/string-width () (should (= 4 (org-string-width #("123" 1 2 (display #("abc" 1 2 (invisible t))))))) ;; Test `space' property in `display'. - (should (= 2 (org-string-width #(" " 0 1 (display (space :width 2))))))) + (should (= 2 (org-string-width #(" " 0 1 (display (space :width 2)))))) + ;; Test `wrap-prefix' property. + (should (= 2 (org-string-width #("ab" 0 2 (wrap-prefix " "))))) + ;; Test `line-prefix' property. + (should (= 2 (org-string-width #("ab" 0 2 (line-prefix " ")))))) ;;; Regexp