fix broken URL fetching

retrogradeorbit · Nov 9, 2019 · a5ade4b · a5ade4b
1 parent a733df7
commit a5ade4b
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/src/bootleg/file.clj b/src/bootleg/file.clj
@@ -43,7 +43,10 @@
 (defmethod input-stream "https" [_ url] (url-input-stream url))
 
 (defn path-relative [filename]
-  (path-join context/*path* filename))
+  (if (or (string/starts-with? filename "http://")
+          (string/starts-with? filename "https://"))
+    filename
+    (path-join context/*path* filename)))
 
 (defn relativise
   "return the relative path that gets you from a working directory