diff options
| author | Phillip Lord <phillip.lord@russet.org.uk> | 2019-06-08 16:53:11 +0100 |
|---|---|---|
| committer | Phillip Lord <phillip.lord@russet.org.uk> | 2019-06-08 16:53:11 +0100 |
| commit | 500d1475c3fe3fdb15b8bb015ca2f9487b13b4f9 (patch) | |
| tree | 816c88e0ad97d8a6cf947ef4dc3101ebcecce7b2 /test/org-drill-test.el | |
| parent | df13d89a4c06aa8e3ed7096dcf576e171fd37042 (diff) | |
| download | org-drill-500d1475c3fe3fdb15b8bb015ca2f9487b13b4f9.tar.gz org-drill-500d1475c3fe3fdb15b8bb015ca2f9487b13b4f9.zip | |
Add count entries test
Diffstat (limited to 'test/org-drill-test.el')
| -rw-r--r-- | test/org-drill-test.el | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/test/org-drill-test.el b/test/org-drill-test.el index 8f5b7e7..26e60c0 100644 --- a/test/org-drill-test.el +++ b/test/org-drill-test.el @@ -26,7 +26,20 @@ ;;; Code: +(require 'assess) (require 'org-drill) +(defvar this-directory + (file-name-directory + (or load-file-name (buffer-file-name)))) + (ert-deftest load-test () (should t)) + +(ert-deftest find-entries () + (should + (equal '(2 30 58) + (assess-with-find-file + (assess-make-related-file + (concat this-directory "one-two-three.org")) + (org-map-drill-entries (lambda () (point)) 'file nil))))) |