   [ns]
   {:pre [(symbol? ns)]}
   (let [ns-str        (str ns)
-        munged-ns-str (s/replace ns-str #"\." "$")]
+        munged-ns-str (string/replace ns-str #"\." "$")]
     (into {} (for [sym (ns-syms ns)]
                [(str munged-ns-str "$" (munge sym)) (symbol ns-str (str sym))]))))
 

(defn- get-file-source
  [filepath]
  (if (symbol? filepath)
    (let [without-extension (s/replace
                              (s/replace (name filepath) #"\." "/")
                              #"-" "_")]
      (or
        (first (js/PLANCK_LOAD (str without-extension ".clj")))

         message             (if (instance? ExceptionInfo error)
                               (ex-message error)
                               (.-message error))]
     (when (or (not ((fnil string/starts-with? "") printed-message message))
             include-stacktrace?)
       (println (((if roa? :rdr-ann-err-fn :ex-msg-fn) theme) message)))
     (when include-stacktrace?
