Initial import of LogDarioSeq baseline
Establishes version control for the personal Logseq DB fork before starting the server-client architecture migration and domain features described in docs/agent-guide and the approved implementation plan. Co-Authored-By: Claude Sonnet 5 <noreply@anthropic.com>
This commit is contained in:
62
deps/graph-parser/test/logseq/graph_parser/property_test.cljs
vendored
Normal file
62
deps/graph-parser/test/logseq/graph_parser/property_test.cljs
vendored
Normal file
@@ -0,0 +1,62 @@
|
||||
(ns logseq.graph-parser.property-test
|
||||
(:require [cljs.test :refer [are deftest testing]]
|
||||
[logseq.graph-parser.property :as gp-property]))
|
||||
|
||||
(def test-db "test-db")
|
||||
|
||||
(deftest test->new-properties
|
||||
(are [x y] (= (gp-property/->new-properties x) y)
|
||||
":PROPERTIES:\n:foo: bar\n:END:"
|
||||
"foo:: bar"
|
||||
|
||||
"hello\n:PROPERTIES:\n:foo: bar\n:END:"
|
||||
"hello\nfoo:: bar"
|
||||
|
||||
"hello\n:PROPERTIES:\n:foo: bar\n:nice: bingo\n:END:"
|
||||
"hello\nfoo:: bar\nnice:: bingo"
|
||||
|
||||
"hello\n:PROPERTIES:\n:foo: bar\n:nice: bingo\n:END:"
|
||||
"hello\nfoo:: bar\nnice:: bingo"
|
||||
|
||||
"hello\n:PROPERTIES:\n:foo: bar\n:nice: bingo\n:END:\nnice"
|
||||
"hello\nfoo:: bar\nnice:: bingo\nnice"
|
||||
|
||||
"hello\n:PROPERTIES:\n:foo: bar\n:nice:\n:END:\nnice"
|
||||
"hello\nfoo:: bar\nnice:: \nnice"
|
||||
|
||||
"hello\n:PROPERTIES:\n:foo: bar\n:nice\n:END:\nnice"
|
||||
"hello\nfoo:: bar\n:nice\nnice"))
|
||||
|
||||
(deftest test-remove-properties
|
||||
(testing "properties with non-blank lines"
|
||||
(are [x y] (= x y)
|
||||
(gp-property/remove-properties :org "** hello\n:PROPERTIES:\n:x: y\n:END:\n")
|
||||
"** hello"
|
||||
|
||||
(gp-property/remove-properties :org "** hello\n:PROPERTIES:\n:x: y\na:b\n:END:\n")
|
||||
"** hello"
|
||||
|
||||
(gp-property/remove-properties :markdown "** hello\nx:: y\na:: b\n")
|
||||
"** hello"
|
||||
|
||||
(gp-property/remove-properties :markdown "** hello\nx:: y\na::b\n")
|
||||
"** hello"))
|
||||
|
||||
(testing "properties with blank lines"
|
||||
(are [x y] (= x y)
|
||||
(gp-property/remove-properties :org "** hello\n:PROPERTIES:\n\n:x: y\n:END:\n")
|
||||
"** hello"
|
||||
|
||||
(gp-property/remove-properties :org "** hello\n:PROPERTIES:\n:x: y\n\na:b\n:END:\n")
|
||||
"** hello"))
|
||||
|
||||
(testing "invalid-properties"
|
||||
(are [x y] (= x y)
|
||||
(gp-property/remove-properties :markdown "hello\nnice\nfoo:: bar")
|
||||
"hello\nnice\nfoo:: bar"
|
||||
|
||||
(gp-property/remove-properties :markdown "hello\nnice\nfoo:: bar\ntest")
|
||||
"hello\nnice\nfoo:: bar\ntest"
|
||||
|
||||
(gp-property/remove-properties :markdown "** hello\nx:: y\n\na:: b\n")
|
||||
"** hello\n\na:: b")))
|
||||
Reference in New Issue
Block a user