       (when (not= (.getMessage e) "EOF while reading")
         (println "Oh noez!")
         (clj-stacktrace.repl/pst e))))
-
   (exit))
-

        :prompt (constantly false)
        :need-prompt (constantly false)))

(defn -main
  "Launches a REPL. Customizations available:
  -h/--help:           Show this help screen
  -i/--init:           Provide custom code to evaluate in the user ns
  --skip-default-init: Skip the default initialization code
  --nrepl:             Launch nREPL (clojure.tools.nrepl) in interactive mode"
  [& args]

  (loop [[option arg & more :as args] args
         arg-map {:custom-init '()}]
    (case option
      "-e" (recur more (assoc arg-map :custom-init (read-string arg)))
      "--eval" (recur more (assoc arg-map :custom-init (read-string arg)))

      "-i" (recur more (assoc arg-map :custom-init (read-string (slurp arg))))
      "--init" (recur more (assoc arg-map :custom-init (read-string (slurp arg))))

      "--attach" (recur more (assoc arg-map :attach arg))
      "--port" (recur more (assoc arg-map :port arg))
