Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Working again

  • Loading branch information...
commit 8ff1e7d995e485ef3570c198f8e85a1c2f509f82 1 parent 012cb82
@fogus authored
Showing with 1 addition and 2 deletions.
  1. +1 −2  src/clj/himera/server/cljs.clj
View
3  src/clj/himera/server/cljs.clj
@@ -27,7 +27,7 @@
:status 200})
(def compilation (partial build
- #(comp/emits (ana/analyze % %2))
+ #(comp/emit-str (ana/analyze % %2))
(setup/load-core-names)))
(def analyze (partial build
@@ -51,7 +51,6 @@
(if-let [nsym (-> env :ns :uses-macros sym)]
(.findInternedVar ^clojure.lang.Namespace (find-ns nsym) sym)
(.findInternedVar ^clojure.lang.Namespace (find-ns 'cljs.core) sym))))]
- (println [sym mvar])
(let [sym (symbol (.getName sym))]
(when (and mvar (or (setup/clojure-macros sym) (setup/cljs-macros sym)))
@mvar))))
Please sign in to comment.
Something went wrong with that request. Please try again.