From 41b38930567162cafc4cbbf70ad1c8f4e4bfc5df Mon Sep 17 00:00:00 2001
From: Michiel Borkent <michielborkent@gmail.com>
Date: Tue, 18 Feb 2020 16:25:04 +0100
Subject: [PATCH] sci: support metadata on namespaces

---
 sci                                       | 2 +-
 src/babashka/impl/clojure/core/server.clj | 2 +-
 src/babashka/main.clj                     | 2 +-
 test/babashka/impl/repl_test.clj          | 2 +-
 4 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/sci b/sci
index 57209f08..9c3c6e49 160000
--- a/sci
+++ b/sci
@@ -1 +1 @@
-Subproject commit 57209f08d18ee168dbc1dca26e60b4958add3c0c
+Subproject commit 9c3c6e492e100b1b438b9e073f574fc52622c818
diff --git a/src/babashka/impl/clojure/core/server.clj b/src/babashka/impl/clojure/core/server.clj
index dd58f737..113934a0 100644
--- a/src/babashka/impl/clojure/core/server.clj
+++ b/src/babashka/impl/clojure/core/server.clj
@@ -46,7 +46,7 @@
     (sci/with-bindings {sci/in in
                         sci/out out
                         sci/err err
-                        vars/current-ns (vars/->SciNamespace 'user)}
+                        vars/current-ns (vars/->SciNamespace 'user nil)}
       (swap! server assoc-in [:sessions client-id] {})
       (apply accept args))
     (catch SocketException _disconnect)
diff --git a/src/babashka/main.clj b/src/babashka/main.clj
index 023eb9f2..36c5af8b 100644
--- a/src/babashka/main.clj
+++ b/src/babashka/main.clj
@@ -283,7 +283,7 @@ Everything after that is bound to *command-line-args*."))
       (prn "M" (meta (get bindings 'future))))
   (binding [*unrestricted* true]
     (sci/binding [reflection-var false
-                  vars/current-ns (vars/->SciNamespace 'user)]
+                  vars/current-ns (vars/->SciNamespace 'user nil)]
       (let [t0 (System/currentTimeMillis)
             {:keys [:version :shell-in :edn-in :shell-out :edn-out
                     :help? :file :command-line-args
diff --git a/test/babashka/impl/repl_test.clj b/test/babashka/impl/repl_test.clj
index 3c9cb72f..29a932c8 100644
--- a/test/babashka/impl/repl_test.clj
+++ b/test/babashka/impl/repl_test.clj
@@ -14,7 +14,7 @@
 (vars/bindRoot sci/err *err*)
 
 (defn repl! []
-  (sci/with-bindings {vars/current-ns (vars/->SciNamespace 'user)}
+  (sci/with-bindings {vars/current-ns (vars/->SciNamespace 'user nil)}
     (start-repl! (init {:bindings {'*command-line-args*
                                    ["a" "b" "c"]}
                         :env (atom {})}))))