* testing/lisp/test-ol.el (test-ol/org-toggle-link-display): Use
back-compatible `org-xor' instead of `xor'.
---
testing/lisp/test-ol.el | 10 +++++-----
1 file changed, 5 insertions(+), 5 deletions(-)
diff --git a/testing/lisp/test-ol.el b/testing/lisp/test-ol.el
index 343631623..429bb52ee 100644
--- a/testing/lisp/test-ol.el
+++ b/testing/lisp/test-ol.el
@@ -59,19 +59,19 @@ (ert-deftest test-ol/org-toggle-link-display ()
(dotimes (_ 2)
(goto-char 1)
(re-search-forward "\\[")
- (should-not (xor org-link-descriptive (org-invisible-p)))
+ (should-not (org-xor org-link-descriptive (org-invisible-p)))
(re-search-forward "example")
- (should-not (xor org-link-descriptive (org-invisible-p)))
+ (should-not (org-xor org-link-descriptive (org-invisible-p)))
(re-search-forward "com")
- (should-not (xor org-link-descriptive (org-invisible-p)))
+ (should-not (org-xor org-link-descriptive (org-invisible-p)))
(re-search-forward "]")
- (should-not (xor org-link-descriptive (org-invisible-p)))
+ (should-not (org-xor org-link-descriptive (org-invisible-p)))
(re-search-forward "\\[")
(should-not (org-invisible-p))
(re-search-forward "link")
(should-not (org-invisible-p))
(re-search-forward "]")
- (should-not (xor org-link-descriptive (org-invisible-p)))
+ (should-not (org-xor org-link-descriptive (org-invisible-p)))
(org-toggle-link-display)))))
--
2.35.1
--
Ihor Radchenko,
PhD,
Center for Advancing Materials Performance from the Nanoscale (CAMP-nano)
State Key Laboratory for Mechanical Behavior of Materials, Xi'an Jiaotong
University, Xi'an, China
Email: yanta...@gmail.com, ihor_radche...@alumni.sutd.edu.sg
