CLJS-2283: Regression with js-obj and gobject alias

Author: mfikes

src/main/clojure/cljs/core.cljc

@@ -2552,8 +2552,8 @@
       (js-obj* '())
       `(let [~@(apply concat (clojure.set/map-invert expr->local))
             ~obj ~(js-obj* (filter-on-keys core/string? kvs))]
-        ~@(map (core/fn [[k v]] `(gobject/set ~obj ~k ~v)) sym-pairs)
-        ~@(map (core/fn [[k v]] `(gobject/set ~obj ~v ~(core/get kvs k))) expr->local)
+        ~@(map (core/fn [[k v]] `(goog.object/set ~obj ~k ~v)) sym-pairs)
+        ~@(map (core/fn [[k v]] `(goog.object/set ~obj ~v ~(core/get kvs k))) expr->local)
         ~obj))))
 
 (core/defmacro alength [a]

src/test/cljs/cljs/macro_test.cljs

@@ -19,3 +19,6 @@
   (is (= '(if true (do 1)) (macroexpand-1 '(when true 1))))
   (is (= 1 (macroexpand '1)))
   (is (= '(if true (do 1)) (macroexpand '(when true 1)))))
+
+(deftest test-cljs-2283
+  (is (= ":a" (first (js-keys (js-obj :a 1))))))