From 85c802ef97f8052e0b185b2c0d5a9e3ef0b8c93e Mon Sep 17 00:00:00 2001
From: Michiel Borkent <michielborkent@gmail.com>
Date: Sat, 9 May 2020 15:25:29 +0200
Subject: [PATCH] Add compatibility with babashka scripts

---
 README.md                       | 2 +-
 src/babashka/pods.clj           | 6 ++++++
 test/babashka/pods/jvm_test.clj | 3 +--
 3 files changed, 8 insertions(+), 3 deletions(-)
 create mode 100644 src/babashka/pods.clj

diff --git a/README.md b/README.md
index 5b0dda2..84c1887 100644
--- a/README.md
+++ b/README.md
@@ -14,7 +14,7 @@ an example pod.
 On the JVM:
 
 ``` clojure
-(require '[babashka.pods.jvm :as pods])
+(require '[babashka.pods :as pods])
 (pods/load-pod "pod-babashka-hsqldb")
 (require '[pod.babashka.hsqldb :as sql])
 
diff --git a/src/babashka/pods.clj b/src/babashka/pods.clj
new file mode 100644
index 0000000..fe0e3b9
--- /dev/null
+++ b/src/babashka/pods.clj
@@ -0,0 +1,6 @@
+(ns babashka.pods
+  (:require [babashka.pods.jvm :as jvm]))
+
+(defn load-pod
+  ([pod-spec] (load-pod pod-spec nil))
+  ([pod-spec opts] (jvm/load-pod pod-spec opts)))
diff --git a/test/babashka/pods/jvm_test.clj b/test/babashka/pods/jvm_test.clj
index f18d6c2..9c77a1e 100644
--- a/test/babashka/pods/jvm_test.clj
+++ b/test/babashka/pods/jvm_test.clj
@@ -1,6 +1,5 @@
 (ns babashka.pods.jvm-test
   (:require [babashka.pods.test-common :refer [test-program]]
-            [clojure.string :as str]
             [clojure.test :refer [deftest is]]))
 
 (deftest jvm-test
@@ -9,7 +8,7 @@
         ret (binding [*out* out
                       *err* err]
               (try (load-string
-                    (str/replace test-program "babashka.pods" "babashka.pods.jvm"))
+                    test-program)
                    (catch Exception e (prn e))))]
 
     (is (= '[{:a 1, :b 2}