diff options
author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2019-01-08 11:32:34 +0100 |
---|---|---|
committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2019-01-08 11:32:34 +0100 |
commit | 21d646775b520f6670e01dba45bda9cf92b4c43d (patch) | |
tree | 506532fad3d5e81476e27476d597156e21cedc82 | |
parent | 7d638dcd498133d217ac3390dfd32effb68217bf (diff) | |
download | org-mode-21d646775b520f6670e01dba45bda9cf92b4c43d.tar.gz |
org-num: Fix failing tests
-rw-r--r-- | testing/lisp/test-org-num.el | 24 |
1 files changed, 12 insertions, 12 deletions
diff --git a/testing/lisp/test-org-num.el b/testing/lisp/test-org-num.el index 6f66daa..e4f3cbc 100644 --- a/testing/lisp/test-org-num.el +++ b/testing/lisp/test-org-num.el @@ -21,18 +21,18 @@ ;;; Code: -;; FIXME: this test fails in batch mode. -;; -;; (ert-deftest test-org-num/face () -;; "Test `org-num-face' parameter." -;; (should -;; (equal -;; '(foo) -;; (org-test-with-temp-text "* H1" -;; (let ((org-num-face 'foo)) (org-num-mode 1)) -;; (mapcar (lambda (o) -;; (get-text-property 0 'face (overlay-get o 'after-string))) -;; (overlays-in (point-min) (point-max))))))) +(require 'org-num) + +(ert-deftest test-org-num/face () + "Test `org-num-face' parameter." + (should + (equal + '(foo) + (org-test-with-temp-text "* H1" + (let ((org-num-face 'foo)) (org-num-mode 1)) + (mapcar (lambda (o) + (get-text-property 0 'face (overlay-get o 'after-string))) + (overlays-in (point-min) (point-max))))))) (ert-deftest test-org-num/format-function () "Test `org-num-format-function' parameter." |