[elpa] externals/org 400e312d4d 09/13: Testing: Change use of `org-set-visibility-according-to-property'

[ELPA Syncer]

branch: externals/org
commit 400e312d4d3cf907d8aea7a2d5e0ba21b0ce4231
Author: Morgan Smith <morgan.j.sm...@outlook.com>
Commit: Ihor Radchenko <yanta...@posteo.net>

    Testing: Change use of `org-set-visibility-according-to-property'
    
    `org-set-visibility-according-to-property' is an obsolete alias of
    `org-cycle-set-visibility-according-to-property'.
    
    * testing/lisp/test-org-fold.el
    (test-org-fold/set-visibility-according-to-property): Change uses of
    deprecated `org-set-visibility-according-to-property' to
    `org-cycle-set-visibility-according-to-property'
---
 testing/lisp/test-org-fold.el | 20 ++++++++++----------
 1 file changed, 10 insertions(+), 10 deletions(-)

diff --git a/testing/lisp/test-org-fold.el b/testing/lisp/test-org-fold.el
index 42b1954440..d1fbe4291c 100644
--- a/testing/lisp/test-org-fold.el
+++ b/testing/lisp/test-org-fold.el
@@ -301,7 +301,7 @@ Some text here
                (current-kill 0 t)))))))
 
 (ert-deftest test-org-fold/set-visibility-according-to-property ()
-  "Test `org-set-visibility-according-to-property' specifications."
+  "Test `org-cycle-set-visibility-according-to-property' specifications."
   ;; "folded" state.
   (should
    (org-test-with-temp-text
@@ -311,7 +311,7 @@ Some text here
 :VISIBILITY: folded
 :END:
 ** <point>b"
-     (org-set-visibility-according-to-property)
+     (org-cycle-set-visibility-according-to-property)
      (invisible-p (point))))
   (org-test-with-temp-text
       "<point>
@@ -354,7 +354,7 @@ Some text here
 ** b
 <point>Contents
 ** c"
-     (org-set-visibility-according-to-property)
+     (org-cycle-set-visibility-according-to-property)
      (invisible-p (point))))
   (should
    (org-test-with-temp-text
@@ -366,7 +366,7 @@ Some text here
 ** b
 Contents
 *** <point>c"
-     (org-set-visibility-according-to-property)
+     (org-cycle-set-visibility-according-to-property)
      (invisible-p (point))))
   ;; "content" state.
   (should
@@ -379,7 +379,7 @@ Contents
 ** b
 <point>Contents
 *** c"
-     (org-set-visibility-according-to-property)
+     (org-cycle-set-visibility-according-to-property)
      (invisible-p (point))))
   (should
    (org-test-with-temp-text
@@ -391,7 +391,7 @@ Contents
 ** b
 Contents
 *** <point>c"
-     (org-set-visibility-according-to-property)
+     (org-cycle-set-visibility-according-to-property)
      (not (invisible-p (point)))))
   ;; "showall" state.
   (should
@@ -404,7 +404,7 @@ Contents
 ** b
 <point>Contents
 *** c"
-     (org-set-visibility-according-to-property)
+     (org-cycle-set-visibility-according-to-property)
      (not (invisible-p (point)))))
   (should
    (org-test-with-temp-text
@@ -416,7 +416,7 @@ Contents
 ** b
 Contents
 *** <point>c"
-     (org-set-visibility-according-to-property)
+     (org-cycle-set-visibility-according-to-property)
      (not (invisible-p (point)))))
   ;; When VISIBILITY properties are nested, do not alter parent
   ;; visibility unless necessary.
@@ -431,7 +431,7 @@ Contents
 :PROPERTIES:
 :VISIBILITY: folded
 :END:"
-     (org-set-visibility-according-to-property)
+     (org-cycle-set-visibility-according-to-property)
      (invisible-p (point))))
   (should
    (org-test-with-temp-text
@@ -444,7 +444,7 @@ Contents
 :PROPERTIES:
 :VISIBILITY: content
 :END:"
-     (org-set-visibility-according-to-property)
+     (org-cycle-set-visibility-according-to-property)
      (not (invisible-p (point))))))
 
 (ert-deftest test-org-fold/visibility-show-branches ()