|
|
@@ -14,16 +14,16 @@
|
|
|
(f)
|
|
|
(conn/destroy-all!))
|
|
|
|
|
|
-(deftest test-page-alias-set
|
|
|
+(deftest test-page-alias-with-multiple-alias
|
|
|
[]
|
|
|
(run-db!
|
|
|
(fn []
|
|
|
(let [files [{:file/path "a.md"
|
|
|
- :file/content "---\ntitle: a\nalias: [[b]]\n---"}
|
|
|
+ :file/content "---\ntitle: a\nalias: b, c\n---"}
|
|
|
{:file/path "b.md"
|
|
|
- :file/content "---\ntitle: b\nalias: [[c]]\n---"}
|
|
|
- {:file/path "d.md"
|
|
|
- :file/content "---\ntitle: d\n---\n## ref to [[b]]"}]
|
|
|
+ :file/content "---\ntitle: b\nalias: a, d\n---"}
|
|
|
+ {:file/path "e.md"
|
|
|
+ :file/content "---\ntitle: e\n---\n## ref to [[b]]"}]
|
|
|
_ (repo-handler/parse-files-and-load-to-db! test-db files {:re-render? false})
|
|
|
a-aliases (model/page-alias-set test-db "a")
|
|
|
b-aliases (model/page-alias-set test-db "b")
|
|
|
@@ -31,19 +31,20 @@
|
|
|
b-ref-blocks (model/get-page-referenced-blocks test-db "b")
|
|
|
a-ref-blocks (model/get-page-referenced-blocks test-db "a")]
|
|
|
(are [x y] (= x y)
|
|
|
- 3 (count a-aliases)
|
|
|
+ 4 (count a-aliases)
|
|
|
+ 4 (count b-aliases)
|
|
|
1 (count b-ref-blocks)
|
|
|
1 (count a-ref-blocks)
|
|
|
- ["b" "c"] alias-names)))))
|
|
|
+ ["b" "c" "d"] alias-names)))))
|
|
|
|
|
|
-(deftest test-page-alias-without-brackets
|
|
|
+(deftest test-page-alias-set
|
|
|
[]
|
|
|
(run-db!
|
|
|
(fn []
|
|
|
(let [files [{:file/path "a.md"
|
|
|
- :file/content "---\ntitle: a\nalias: b\n---"}
|
|
|
+ :file/content "---\ntitle: a\nalias: [[b]]\n---"}
|
|
|
{:file/path "b.md"
|
|
|
- :file/content "---\ntitle: b\nalias: c\n---"}
|
|
|
+ :file/content "---\ntitle: b\nalias: [[c]]\n---"}
|
|
|
{:file/path "d.md"
|
|
|
:file/content "---\ntitle: d\n---\n## ref to [[b]]"}]
|
|
|
_ (repo-handler/parse-files-and-load-to-db! test-db files {:re-render? false})
|
|
|
@@ -58,16 +59,16 @@
|
|
|
1 (count a-ref-blocks)
|
|
|
["b" "c"] alias-names)))))
|
|
|
|
|
|
-(deftest test-page-alias-with-multiple-alias
|
|
|
+(deftest test-page-alias-without-brackets
|
|
|
[]
|
|
|
(run-db!
|
|
|
(fn []
|
|
|
(let [files [{:file/path "a.md"
|
|
|
- :file/content "---\ntitle: a\nalias: b, c\n---"}
|
|
|
+ :file/content "---\ntitle: a\nalias: b\n---"}
|
|
|
{:file/path "b.md"
|
|
|
- :file/content "---\ntitle: b\nalias: a, d\n---"}
|
|
|
- {:file/path "e.md"
|
|
|
- :file/content "---\ntitle: e\n---\n## ref to [[b]]"}]
|
|
|
+ :file/content "---\ntitle: b\nalias: c\n---"}
|
|
|
+ {:file/path "d.md"
|
|
|
+ :file/content "---\ntitle: d\n---\n## ref to [[b]]"}]
|
|
|
_ (repo-handler/parse-files-and-load-to-db! test-db files {:re-render? false})
|
|
|
a-aliases (model/page-alias-set test-db "a")
|
|
|
b-aliases (model/page-alias-set test-db "b")
|
|
|
@@ -75,10 +76,9 @@
|
|
|
b-ref-blocks (model/get-page-referenced-blocks test-db "b")
|
|
|
a-ref-blocks (model/get-page-referenced-blocks test-db "a")]
|
|
|
(are [x y] (= x y)
|
|
|
- 4 (count a-aliases)
|
|
|
- 4 (count b-aliases)
|
|
|
+ 3 (count a-aliases)
|
|
|
1 (count b-ref-blocks)
|
|
|
1 (count a-ref-blocks)
|
|
|
- ["b" "c" "d"] alias-names)))))
|
|
|
+ ["b" "c"] alias-names)))))
|
|
|
|
|
|
#_(cljs.test/test-ns 'frontend.db.model-test)
|