瀏覽代碼

fix distinct-struct

rcmerci 4 年之前
父節點
當前提交
47c93651ee
共有 1 個文件被更改,包括 7 次插入1 次删除
  1. 7 1
      src/main/frontend/modules/outliner/yjs.cljs

+ 7 - 1
src/main/frontend/modules/outliner/yjs.cljs

@@ -172,7 +172,7 @@ return [2 3]
                    (instance? y/Array (.get struct (inc i))))
                 (let [next-item (.get struct (inc i))]
                   (distinct-struct next-item id-set)
-                  (.push (.get struct (dec i)) (.toArray next-item))
+                  (.push (.get struct (dec i)) (.toJSON next-item))
                   (.delete struct (inc i))
                   (.delete struct i)
                   (recur i))
@@ -845,6 +845,12 @@ return [2 3]
         contentmap (contentmap)]
     (struct->content-struct struct contentmap)))
 
+(defn- remote-page-contents [page-name]
+  (let [struct (.toJSON (remote-structarray page-name))
+        contentmap (remote-contentmap)]
+    (struct->content-struct struct contentmap)))
+
+
 (defn- build-test-struct []
   (def test-doc (y/Doc.))
   (def test-struct (.getArray test-doc "test-struct"))