소스 검색

test-org/entry-get: Add test checking reported bug

See https://list.orgmode.org/orgmode/87zgrqqlcs.fsf@toloe.se/
Ihor Radchenko 3 년 전
부모
커밋
8d9ca0eac1
1개의 변경된 파일4개의 추가작업 그리고 0개의 파일을 삭제
  1. 4 0
      testing/lisp/test-org.el

+ 4 - 0
testing/lisp/test-org.el

@@ -5869,6 +5869,10 @@ Paragraph<point>"
    (org-test-with-temp-text "* H\n:PROPERTIES:\n:A: 1\n:END:\n** H2"
      (let ((org-use-property-inheritance nil))
        (org-entry-get (point-max) "A" 'selective))))
+  (should-not
+   (org-test-with-temp-text "* H\n:PROPERTIES:\n:A: 1\n:END:\n* H2"
+     (let ((org-use-property-inheritance t))
+       (org-entry-get (point-max) "A" t))))
   (should
    (equal
     "1 2"