Permalink
Browse files

* src/clj/cljs/compiler.clj: preserve :tag on dot forms

  • Loading branch information...
1 parent 17a22ac commit c227d5965b29bb76030cedbef76c035a4fb8ef13 David Nolen committed May 3, 2012
Showing with 4 additions and 2 deletions.
  1. +4 −2 src/clj/cljs/compiler.clj
@@ -1210,13 +1210,15 @@
::access {:env env :op :dot :form form
:target targetexpr
:field field
- :children [targetexpr]}
+ :children [targetexpr]
+ :tag (-> form meta :tag)}
::call (let [argexprs (map #(analyze enve %) args)]
{:env env :op :dot :form form
:target targetexpr
:method method
:args argexprs
- :children (into [targetexpr] argexprs)})))))
+ :children (into [targetexpr] argexprs)
+ :tag (-> form meta :tag)})))))
(defmethod parse 'js*
[op env [_ jsform & args :as form] _]

0 comments on commit c227d59

Please sign in to comment.