1
0
Эх сурвалжийг харах

fix: add missing time for file write chan message

Tienson Qin 1 жил өмнө
parent
commit
11b0ac6f24

+ 2 - 2
src/main/frontend/modules/outliner/file.cljs

@@ -56,7 +56,7 @@
                    (not (state/input-idle? repo {:diff 3000}))) ;; long page
               ;; when this whiteboard page is just being updated
               (and whiteboard? (not (state/whiteboard-idle? repo))))
-        (async/put! (state/get-file-write-chan) [repo page-db-id outliner-op])
+        (async/put! (state/get-file-write-chan) [repo page-db-id outliner-op (tc/to-long (t/now))])
         (let [pull-keys (if whiteboard? whiteboard-blocks-pull-keys-with-persisted-ids '[*])
               blocks (model/get-page-blocks-no-cache repo (:block/name page-block) {:pull-keys pull-keys})
               blocks (if whiteboard? (map cleanup-whiteboard-block blocks) blocks)]
@@ -102,7 +102,7 @@
   []
   (util/<ratelimit (state/get-file-write-chan) batch-write-interval
                  :filter-fn
-                 (fn [[repo _ time]]
+                 (fn [[repo _ _ time]]
                    (swap! *writes-finished? assoc repo {:time time
                                                         :value false})
                    true)