     [clojure.main :only [repl skip-if-eol skip-whitespace]]
     [clojure.string :only [blank? split]])
   (:require
-    (clj-assorted-utils [util :refer :all])
-    (clojure [stacktrace :refer :all]))
+    (clj-assorted-utils [util :as utils])
+    (clojure [stacktrace :as strace]))
   (:import
     (java.io PushbackReader StringReader)
     (jline.console ConsoleReader)

    (fn [m k]
      (let [f (get-in opts [:cmds k :fn])
            args (cond
                   (symbol? f) (map-quote-vec (get-defn-arglists (eval `(var ~f))))
                   (and (list? f)
                        (= 'fn (first f))) (:args (get-fn-arglists f))
                   :default nil)]
        (if (and
              (not (nil? args))

  (cond
    (and
      (instance? Exception arg)
      ((:print-exception-trace opts))) (strace/print-cause-trace arg)
    (instance? Exception arg) (utils/println-err (.getMessage arg))
    :default (utils/println-err (str arg))))

(def cli-default-options
  {:allow-eval false
