diff options
| author | scgilardi <scgilardi@gmail.com> | 2008-08-06 02:36:32 +0000 |
|---|---|---|
| committer | scgilardi <scgilardi@gmail.com> | 2008-08-06 02:36:32 +0000 |
| commit | 097921e26b0537e148613928e4326823e12b4290 (patch) | |
| tree | 562c22f041ab78eaebdd2b79eebec94d38e2f600 | |
| parent | 10cf722c961427f46da460548dcd1ef215728342 (diff) | |
lib.clj: simplify logic in load-namespaces, longer code, but clearer
| -rw-r--r-- | lib/lib.clj | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lib/lib.clj b/lib/lib.clj index e912b9e0..36c5a94e 100644 --- a/lib/lib.clj +++ b/lib/lib.clj @@ -364,8 +364,9 @@ (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))))))))) + (if (symbol? nsspec) + (apply load-lib prefix nsspec flag-opts) + (apply load-lib prefix (concat nsspec flag-opts))))))))) (defn namespaces "Returns a sorted set of symbols naming loaded namespaces" |