Taking the risk to be ridiculous in the front of all my peers : how is your
function different from the "clojure.core/use" function, exactly ?

2011/1/17 Seth <wbu...@gmail.com>

> woops, mistake
>
> (defn ns-export [from-ns]
>   (count (doall (map (fn [[sym var]]
>                        (let [v (if (.hasRoot var)
>                                 (var-get var))
>                             var-obj (if v (intern *ns* sym v))]
>                         (when var-obj
>                           (alter-meta! var-obj
>                                        (fn [old] (merge (meta var) old)))
>                           var-obj)))
>                      (ns-publics from-ns)))))
>
> --
> You received this message because you are subscribed to the Google
> Groups "Clojure" group.
> To post to this group, send email to clojure@googlegroups.com
> Note that posts from new members are moderated - please be patient with
> your first post.
> To unsubscribe from this group, send email to
> clojure+unsubscr...@googlegroups.com<clojure%2bunsubscr...@googlegroups.com>
> For more options, visit this group at
> http://groups.google.com/group/clojure?hl=en
>

-- 
You received this message because you are subscribed to the Google
Groups "Clojure" group.
To post to this group, send email to clojure@googlegroups.com
Note that posts from new members are moderated - please be patient with your 
first post.
To unsubscribe from this group, send email to
clojure+unsubscr...@googlegroups.com
For more options, visit this group at
http://groups.google.com/group/clojure?hl=en

Reply via email to