; Install a deb package from URL
-(require '[babashka.process :as p]
- '[clojure.java.io :as io])
+(require '[clojure.java.io :as io]
+ '[lib :refer [download-binary run-cmd unixify]])
-(when (= *file* (System/getProperty "babashka.file"))
- (let [url (first *command-line-args*)]
- (println "Downloading deb package...")
+(defn- install-deb
+ [url]
+ (println "Downloading deb package..."
(download-binary url "package.deb")
(println "Installing...")
(run-cmd ["sudo" "gdebi" "--non-interactive" "package.deb"])
(println "Cleaning up..")
(io/delete-file "package.deb")
(println "Done.")))
+
+(unixify install-deb)