We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 0db40b3 commit 7f79ac9Copy full SHA for 7f79ac9
src/clj/clojure/core.clj
@@ -5573,9 +5573,11 @@
5573
(list* `gen-class :name (.replace (str name) \- \_) :impl-ns name :main true (next gen-class-clause)))
5574
references (remove #(= :gen-class (first %)) references)
5575
;ns-effect (clojure.core/in-ns name)
5576
- ]
+ name-metadata (meta name)]
5577
`(do
5578
(clojure.core/in-ns '~name)
5579
+ ~@(when name-metadata
5580
+ `((.resetMeta (clojure.lang.Namespace/find '~name) ~name-metadata)))
5581
(with-loading-context
5582
~@(when gen-class-call (list gen-class-call))
5583
~@(when (and (not= name 'clojure.core) (not-any? #(= :refer-clojure (first %)) references))
0 commit comments