reduce unnecessary calling; alpha release

meyvn.edn

@@ -1,7 +1,7 @@
 
 {:pom {:group-id "respo",
        :artifact-id "reacher",
-       :version "0.2.1",
+       :version "0.2.2-a1",
        :name "Very simple React.js binding in ClojureScript"}
  :packaging {:jar {:enabled true
                    :remote-repository {:id "clojars"

package.json

@@ -21,7 +21,7 @@
   "license": "MIT",
   "devDependencies": {
     "http-server": "^0.11.1",
-    "shadow-cljs": "^2.8.41"
+    "shadow-cljs": "^2.8.42"
   },
   "dependencies": {
     "react": "^16.8.6",

src/reacher/core.cljs

@@ -25,8 +25,7 @@
 (defn map-upper-case [m]
   (->> m (medley/map-keys (fn [k] (keyword (dashed->camel (name k)))))))
 
-(defn react-create-element [el props & children]
-  (apply (partial React/createElement el props) children))
+(def react-create-element React/createElement)
 
 (defn transform-props [props]
   (let [result (-> (map-upper-case props) (update :style map-upper-case))]

src/reacher/example/comp/container.cljs

@@ -58,13 +58,11 @@
   (let [tasks (j/get props :tasks)]
     (div
      {}
-     (apply
-      array
-      (->> tasks
-           (sort-by (fn [[k task]] (unchecked-negate (:time task))))
-           (map
-            (fn [[k task]]
-              (React/createElement comp-task (j/obj :task task :key (:id task))))))))))
+     (->> tasks
+          (sort-by (fn [[k task]] (unchecked-negate (:time task))))
+          (map
+           (fn [[k task]]
+             (React/createElement comp-task (j/obj :task task :key (:id task)))))))))
 
 (defn comp-container [props]
   (let [store (j/get props :store)]

src/reacher/example/page.cljs

@@ -21,7 +21,7 @@
      {}
      (div {:class-name "app"})
      (div {:class-name "meson-modal-container"})
-     (->> (:scripts info) (map (fn [src] (script {:src src, :key src}))) (apply array))))))
+     (->> (:scripts info) (map (fn [src] (script {:src src, :key src}))))))))
 
 (defn dev-page []
   (make-page