Просмотр исходного кода

fix: whiteboard load issue on file name

Peng Xiao 3 лет назад
Родитель
Сommit
a58e513928
1 измененных файлов с 3 добавлено и 1 удалено
  1. 3 1
      deps/graph-parser/src/logseq/graph_parser/extract.cljc

+ 3 - 1
deps/graph-parser/src/logseq/graph_parser/extract.cljc

@@ -235,7 +235,9 @@
   (let [_ (when verbose (println "Parsing start: " file))
         {:keys [pages blocks]} (gp-util/safe-read-string content)
         page-block (first pages)
-        page-name (filepath->page-name file)
+        page-name (or (:block/original-name page-block)
+                      (:block/name page-block)
+                      (filepath->page-name file))
         page-original-name (-> (:block/original-name page-block)
                                (#(cond (nil? %) page-name
                                        (= (gp-util/page-name-sanity-lc %)