浏览代码

fix: open local url

Konstantinos Kaloutas 3 年之前
父节点
当前提交
87cc0af3db
共有 1 个文件被更改,包括 3 次插入4 次删除
  1. 3 4
      src/electron/electron/window.cljs

+ 3 - 4
src/electron/electron/window.cljs

@@ -112,10 +112,9 @@
   [url default-open]
   [url default-open]
   (let [URL (.-URL URL)
   (let [URL (.-URL URL)
         parsed-url (try (URL. url) (catch :default _ nil))]
         parsed-url (try (URL. url) (catch :default _ nil))]
-    (when parsed-url
-      (condp contains? (.-protocol parsed-url)
-        #{"https:" "http:" "mailto:"} (.openExternal shell url)
-        (default-open url)))))
+    (if (and parsed-url (contains? #{"https:" "http:" "mailto:"} (.-protocol parsed-url)))
+      (.openExternal shell url)
+      (when default-open (default-open url)))))
 
 
 (defn setup-window-listeners!
 (defn setup-window-listeners!
   [^js win]
   [^js win]