|
@@ -8,12 +8,29 @@
|
|
|
"Copy of frontend.config/app-name. Too small to couple to main app"
|
|
"Copy of frontend.config/app-name. Too small to couple to main app"
|
|
|
"logseq")
|
|
"logseq")
|
|
|
|
|
|
|
|
|
|
+(defonce asset-protocol "assets://")
|
|
|
|
|
+(defonce capacitor-protocol "capacitor://")
|
|
|
|
|
+
|
|
|
(defonce local-assets-dir "assets")
|
|
(defonce local-assets-dir "assets")
|
|
|
|
|
|
|
|
(defn local-asset?
|
|
(defn local-asset?
|
|
|
[s]
|
|
[s]
|
|
|
(gp-util/safe-re-find (re-pattern (str "^[./]*" local-assets-dir)) s))
|
|
(gp-util/safe-re-find (re-pattern (str "^[./]*" local-assets-dir)) s))
|
|
|
|
|
|
|
|
|
|
+(defn local-protocol-asset?
|
|
|
|
|
+ [s]
|
|
|
|
|
+ (when (string? s)
|
|
|
|
|
+ (or (string/starts-with? s asset-protocol)
|
|
|
|
|
+ (string/starts-with? s capacitor-protocol))))
|
|
|
|
|
+
|
|
|
|
|
+(defn remove-asset-protocol
|
|
|
|
|
+ [s]
|
|
|
|
|
+ (if (local-protocol-asset? s)
|
|
|
|
|
+ (-> s
|
|
|
|
|
+ (string/replace-first asset-protocol "")
|
|
|
|
|
+ (string/replace-first capacitor-protocol ""))
|
|
|
|
|
+ s))
|
|
|
|
|
+
|
|
|
(defonce default-draw-directory "draws")
|
|
(defonce default-draw-directory "draws")
|
|
|
|
|
|
|
|
(defn draw?
|
|
(defn draw?
|