   [{:keys [skip-default-init
            custom-init] :as options}]
   `(do
-    ~(when-not skip-default-init default-init-code)
+    ~(when-not skip-default-init (default-init-code))
     ~(when custom-init custom-init)
     nil))
 

    (def exit reply.main/exit)
    (def quit reply.main/exit)
    (def help reply.initialization/help)
    (help)
    (reply.initialization/intern-with-meta 'user 'clojuredocs #'cd-client.core/pr-examples)
    nil))

(defn eval-in-user-ns [code]

(ns reply.initialization
  (:require [clojure.pprint]))

(defmacro repl-defn [sym & args]
  (let [no-meta-source (with-out-str (clojure.pprint/pprint `(defn ~sym ~@args)))
        meta-source `(clojure.core/defn ~(with-meta sym {:source no-meta-source}) ~@args)]
    meta-source))

(defmacro sourcery [name]
  `(if-let [s# (:source (meta (var ~name)))]
    (do (print s#) (flush))
    (clojure.repl/source ~name)))

(defn help
  "Prints a list of helpful commands."
