diff options
Diffstat (limited to 'lib/lib.clj')
| -rw-r--r-- | lib/lib.clj | 14 |
1 files changed, 8 insertions, 6 deletions
diff --git a/lib/lib.clj b/lib/lib.clj index 154fb85e..e912b9e0 100644 --- a/lib/lib.clj +++ b/lib/lib.clj @@ -356,14 +356,16 @@ indirectly load via load-namespaces/require/use :verbose triggers printing information about each load and refer" [& args] - (let [nsgroupspecs (filter (complement keyword?) args) + (let [nsargs (filter (complement keyword?) args) flags (filter keyword? args) flag-opts (interleave flags (repeat true))] - (doseq nsgroupspec nsgroupspecs - (let [[prefix & nsspecs] nsgroupspec] - (doseq nsspec nsspecs - (let [combine (if (symbol? nsspec) cons concat)] - (apply load-lib prefix (combine nsspec flag-opts)))))))) + (doseq nsarg nsargs + (if (symbol? nsarg) + (apply load-lib nil nsarg flag-opts) + (let [[prefix & nsspecs] nsarg] + (doseq nsspec nsspecs + (let [combine (if (symbol? nsspec) cons concat)] + (apply load-lib prefix (combine nsspec flag-opts))))))))) (defn namespaces "Returns a sorted set of symbols naming loaded namespaces" |