mirror of
https://github.com/logseq/logseq.git
synced 2026-05-24 12:44:22 +00:00
fix(import): preserve emails in quote blocks
This commit is contained in:
@@ -1017,6 +1017,9 @@
|
||||
[(get node 4)]
|
||||
(and (vector? node) (= (first node) "Code"))
|
||||
["`" (second node) "`"]
|
||||
(and (vector? node) (= (first node) "Email"))
|
||||
(let [{:keys [local_part domain]} (second node)]
|
||||
[(str "<" local_part "@" domain ">")])
|
||||
(and (vector? node) (= "Macro" (first node)) (= "query" (:name (second node))))
|
||||
(:arguments (second node))
|
||||
(and (vector? node) (= (first node) "Example"))
|
||||
|
||||
@@ -208,6 +208,19 @@
|
||||
(is (empty? (map :entity (:errors (db-validate/validate-local-db! @conn))))
|
||||
"Imported graph validates")))
|
||||
|
||||
(deftest-async import-quote-with-email-address
|
||||
(p/let [file (write-temp-graph-file
|
||||
"pages/email.md"
|
||||
"- > \"CachyOS <admin@cachyos.org>\"\n")
|
||||
conn (db-test/create-conn)
|
||||
_ (db-pipeline/add-listener conn)
|
||||
_ (import-files-to-db [file] conn {})]
|
||||
(is (= "\"CachyOS <admin@cachyos.org>\""
|
||||
(:block/title (db-test/find-block-by-content @conn #"CachyOS")))
|
||||
"Email addresses inside quotes are preserved during import")
|
||||
(is (empty? (map :entity (:errors (db-validate/validate-local-db! @conn))))
|
||||
"Imported graph validates")))
|
||||
|
||||
(deftest update-asset-links-in-block-title
|
||||
(are [x y]
|
||||
(= y (@#'gp-exporter/update-asset-links-in-block-title (first x) {(second x) "UUID"} (atom {})))
|
||||
|
||||
Reference in New Issue
Block a user