aboutsummaryrefslogtreecommitdiff
path: root/lib.clj
diff options
context:
space:
mode:
Diffstat (limited to 'lib.clj')
-rw-r--r--lib.clj12
1 files changed, 7 insertions, 5 deletions
diff --git a/lib.clj b/lib.clj
index 3e847c6f..deab7da8 100644
--- a/lib.clj
+++ b/lib.clj
@@ -179,18 +179,20 @@
filter-opts (select-keys opts *filter-keys*)]
(binding [*verbose* (or *verbose* verbose)]
(when load
- (throw-if (not url) "'%s' not found in classpath" path)
- (load sym url namespace)
(when *verbose*
- (printf "(lib/load-resource \"%s\")\n" url)))
+ (printf "(lib/load-resource \"%s\")\n" url)
+ (flush))
+ (throw-if (not url) "'%s' not found in classpath" path)
+ (load sym url namespace))
(when namespace
- (apply refer namespace (mapcat seq filter-opts))
(when *verbose*
+ (printf "(clojure/in-ns '%s)\n" (ns-name *ns*))
(printf "(clojure/refer '%s" namespace)
(dorun (map
#(printf " %s '%s" (key %) (print-str (val %)))
filter-opts))
- (printf ")\n"))))))
+ (printf ")\n"))
+ (apply refer namespace (mapcat seq filter-opts))))))
;; Resources