|
@@ -52,13 +52,7 @@
|
|
|
(merge read-handlers))
|
|
(merge read-handlers))
|
|
|
reader (transit/reader :json {:handlers read-handlers*})]
|
|
reader (transit/reader :json {:handlers read-handlers*})]
|
|
|
(fn read-transit-str* [s]
|
|
(fn read-transit-str* [s]
|
|
|
- ;; TODO: delete the following pred later
|
|
|
|
|
- ;; https://github.com/logseq/logseq/pull/11790#discussion_r2014120469
|
|
|
|
|
- (if (and (string? s) (or (identical? "[" (first s))
|
|
|
|
|
- (identical? "(" (first s))))
|
|
|
|
|
- (transit/read reader s)
|
|
|
|
|
- (do (prn :invalid-transit-string s)
|
|
|
|
|
- s)))))
|
|
|
|
|
|
|
+ (transit/read reader s))))
|
|
|
|
|
|
|
|
(defn db-based-graph?
|
|
(defn db-based-graph?
|
|
|
[graph-name]
|
|
[graph-name]
|