awesome-emacs/org-roam
1
0
Fork 0
mirror of https://github.com/org-roam/org-roam synced 2025-08-07 12:47:23 -05:00
Code Issues Packages Projects Releases Wiki Activity

(test): add org-roam--get-titles (#2453)

Browse Source
This commit is contained in:
Bruno Heridet
2024-07-07 17:18:20 +02:00
committed by GitHub
parent 1ce760ccc7
commit a432539121
2 changed files with 19 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

17
tests/test-org-roam-node.el
View File

@ -57,6 +57,23 @@
(find-file "tests/roam-files/promoteable.org" nil) (find-file "tests/roam-files/promoteable.org" nil)
(expect (org-roam--buffer-promoteable-p) :to-equal t))) (expect (org-roam--buffer-promoteable-p) :to-equal t)))
(describe "org-roam--get-titles"
(before-all
(setq org-roam-directory (expand-file-name "tests/roam-files")
org-roam-db-location (expand-file-name "org-roam.db" temporary-file-directory)
org-roam-file-extensions '("org")
org-roam-file-exclude-regexp nil)
(org-roam-db-sync))
(after-all
(org-roam-db--close)
(delete-file org-roam-db-location))
(it "returns the list of titles and aliases"
(expect (org-roam--get-titles)
:to-have-same-items-as
`("Bar" "Child" "Family" "Foo" "Grand-Parent" "Parent" "ref with space"))))
(provide 'test-org-roam-node) (provide 'test-org-roam-node)
;;; test-org-roam-node.el ends here ;;; test-org-roam-node.el ends here

2
tests/test-org-roam-utils.el
View File

@ -60,3 +60,5 @@
:to-equal "test file")) :to-equal "test file"))
(provide 'test-org-roam-utils) (provide 'test-org-roam-utils)
;;; test-org-roam-utils.el ends here